Fixing messages and Improving remote messages from html.
This commit is contained in:
parent
d2025d8aa9
commit
fb00701e9e
@ -1,5 +1,4 @@
|
|||||||
accessing
|
accessing
|
||||||
getRemoteMessagesFromHtml
|
getRemoteMessagesFromHtml
|
||||||
|
|
||||||
self messages: (self collectRawTweetsUpToPage: 1).
|
^ messages := self collectRawTweetsUpToPage: 1
|
||||||
^ self messages
|
|
@ -1,7 +1,12 @@
|
|||||||
accessing
|
accessing
|
||||||
messages
|
messages
|
||||||
|
|
||||||
messages ifNil: [ ^ messages := TweetsCollection new ].
|
messages ifNil: [ messages := TweetsCollection new ].
|
||||||
messages ifEmpty: [ self getRemoteMessagesFromHtml ].
|
messages ifEmpty: [ self getRemoteMessagesFromHtml ].
|
||||||
self config isEmpty ifTrue: [ ^ messages ].
|
[ config at: 'reportingPeriod' ]
|
||||||
|
onErrorDo: [ self config
|
||||||
|
at: 'reportingPeriod'
|
||||||
|
put: (Timespan
|
||||||
|
starting: (messages oldest created asDateAndTime)
|
||||||
|
ending: (messages newest created asDateAndTime + 1 minute)) ].
|
||||||
^ messages select: [ :message | message created between: self reportingPeriod start and: self reportingPeriod end ]
|
^ messages select: [ :message | message created between: self reportingPeriod start and: self reportingPeriod end ]
|
Loading…
Reference in New Issue
Block a user