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 ] |