accessing
writeWordsFile
	| rawTweets output |
	self tweets ifNil: [ ^ self ].
	rawTweets := self tweets tweets.
	output := '' writeStream.
	rawTweets do: [ :current |  
		output addAll: current words.
	].
	^ MarkupFile exportAsFileOn: FileLocator "usersStorage" containing: output.