Tweets scraping: updating from web until the most recently stored.

This commit is contained in:
Offray Vladimir Luna Cárdenas 2022-05-15 16:32:06 -05:00
parent 7717f00185
commit bc6a4fb9eb

View File

@ -2,6 +2,7 @@ accessing
updatedTweets updatedTweets
| currentTweetsPage response nextPageCursor | | currentTweetsPage response nextPageCursor |
response := TweetsCollection new.
currentTweetsPage := self collectRawTweetsFrom: self userNameLinkWithReplies upToPage: 2. currentTweetsPage := self collectRawTweetsFrom: self userNameLinkWithReplies upToPage: 2.
[ (currentTweetsPage collect: [ :tweet | tweet id ]) includes: self newestTweet id ] whileFalse: [ [ (currentTweetsPage collect: [ :tweet | tweet id ]) includes: self newestTweet id ] whileFalse: [
response addAll: currentTweetsPage. response addAll: currentTweetsPage.