Editing tweets preview with limit of tweets and html report file metod.
This commit is contained in:
parent
5336e8d224
commit
7d77d26691
@ -11,7 +11,7 @@ gtTweetsFor: aView
|
||||
c vertical fitContent.
|
||||
c horizontal matchParent ];
|
||||
padding: (BlInsets all: 10).
|
||||
self messages do: [ :each |
|
||||
(self messages copyFrom: 1 to: 20) do: [ :each |
|
||||
imageContainer := BrAsyncWidget new
|
||||
aptitude: BrShadowAptitude new;
|
||||
background: Color white;
|
||||
|
@ -50,6 +50,10 @@ asCardElement
|
||||
aptitude: BrGlamorousButtonWithLabelAptitude new;
|
||||
label: 'PDF report';
|
||||
action: [ WebBrowser openOn: self pdfReportFile fullName ].
|
||||
"BrButton new
|
||||
aptitude: BrGlamorousButtonWithLabelAptitude new;
|
||||
label: 'Web report';
|
||||
action: [ WebBrowser openOn: self htmlReportFile fullName ]."
|
||||
}.
|
||||
|
||||
^ BrHorizontalPane new
|
||||
|
@ -0,0 +1,4 @@
|
||||
accessing
|
||||
htmlReportFile
|
||||
|
||||
^ self folder / self userName , 'html'
|
Loading…
Reference in New Issue
Block a user