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