15 lines
416 B
Smalltalk
15 lines
416 B
Smalltalk
accessing
|
|
getMessages
|
|
| lastTweetsRaw customQuery lastTweets |
|
|
lastTweetsRaw := self rssFeed xmlDocument xpath: '//item'.
|
|
lastTweets := TweetsCollection new.
|
|
customQuery := Dictionary new
|
|
at: 'parameters' put: self;
|
|
at: 'date' put: DateAndTime now;
|
|
yourself.
|
|
lastTweets query: customQuery.
|
|
lastTweetsRaw do: [ :rssTweet |
|
|
lastTweets add: ((Tweet new fromNitterRssItem: rssTweet ))
|
|
].
|
|
^ lastTweets
|
|
|