11 lines
326 B
Smalltalk
11 lines
326 B
Smalltalk
accessing
|
|
exportOverviewReportLatex
|
|
|
|
| weeks floor divisions |
|
|
weeks := ((self newestTweet created - self oldestTweet created) days / 7).
|
|
floor := weeks floor.
|
|
(weeks - floor) > 0.4
|
|
ifTrue: [ divisions := floor ]
|
|
ifFalse: [ divisions := floor + 1 ].
|
|
self exportOverviewReportLatexWithBars: divisions.
|
|
^ self folder |