Socialmetrica/Socialmetrica.package/NitterUser.class/instance/pageDocTrees..st

14 lines
387 B
Smalltalk
Raw Permalink Normal View History

accessing
pageDocTrees: anInteger
| response nextPageLink previousPageLink |
response := OrderedDictionary new.
previousPageLink := self userNameLink.
response add: previousPageLink.
anInteger - 1 timesRepeat: [
nextPageLink := self userNameLink, (self pageCursorFor:previousPageLink) value.
response add: nextPageLink.
previousPageLink := nextPageLink
].
^ response