Fixing messages processing for asDictionary and web report exporter.

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

@@ -3,4 +3,4 @@ profileImageUrl
 
 	| documentTree |
 	documentTree := [ self documentTree ] onErrorDo: [ ^ nil ].
-	^ self class nitterProvider, (((documentTree xpath: '//div[@class="profile-card-info"]//a[@class="profile-card-avatar"]') @ 'href') stringValue copyReplaceAll: '%2F' with: '/') copyWithoutFirst
+	^ profileImageUrl :=  self class nitterProvider, (((documentTree xpath: '//div[@class="profile-card-info"]//a[@class="profile-card-avatar"]') @ 'href') stringValue copyReplaceAll: '%2F' with: '/') copyWithoutFirst

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

@@ -2,6 +2,10 @@ accessing
 quotesReportData
 
 	| tempDict labels xAxis |
+	self quotes isEmpty
+		ifTrue: [ ^ { OrderedDictionary new. 
+			('[''', '0', ''']'). 
+			('[''', 'No replies', ''']')} ].
 	tempDict := self quotes asMessagesUserNamesSortedByOccurrences.
 
 	tempDict size > 10 ifTrue: [

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

@@ -2,6 +2,10 @@ accessing
 repliesByWeeksTimeSpan
 
 	| tweetsByTimeSpan xAxis labels |
+	self replies isEmpty
+		ifTrue: [ ^ { OrderedDictionary new. 
+			('[''', '0', ''']'). 
+			('[''', 'No replies', ''']')} ].
 	tweetsByTimeSpan := self collectMessages: [ self replies ] byTimeSpanSplits: self tweetsDivisionsByWeeks.
 	xAxis := OrderedCollection new.
 	(tweetsByTimeSpan values collect: [ :collection | collection size ]) do: [ :number |

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

@@ -5,6 +5,8 @@ tweetsDivisionsByWeeks
 	weeks := ((self newestTweet created - self oldestTweet created) days / 7).
 	floor := weeks floor.
 	(weeks - floor) > 0.4 
-		ifTrue: [ divisions := floor ] 
+		ifTrue: [ floor = 0
+			ifTrue: [ divisions := 1 ] 
+			ifFalse: [ divisions := floor]] 
 		ifFalse: [ divisions := floor + 1 ].
 	^ divisions