7 lines
293 B
Smalltalk
7 lines
293 B
Smalltalk
|
accessing
|
||
|
messages
|
||
|
|
||
|
messages ifNil: [ ^ messages := TweetsCollection new ].
|
||
|
messages ifEmpty: [ self getRemoteMessagesFromHtml ].
|
||
|
self config isEmpty ifTrue: [ ^ messages ].
|
||
|
^ messages select: [ :message | message created between: self reportingPeriod start and: self reportingPeriod end ]
|