Modifying oldest tweet selection and oldest tweet for nitter user.

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

@@ -1,4 +1,4 @@
 accessing
 getPagesContentsFromOldestUpto: anInteger
 
-	^ self getPagesContentsFrom: ((self messages oldest metadata select: [ :item | item isString and: [ item beginsWith: 'https://' ]]) values first) Upto: anInteger
+	^ self getPagesContentsFrom: ((self oldestTweet metadata select: [ :item | item isString and: [ item beginsWith: 'https://' ]]) values first) Upto: anInteger

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

@@ -0,0 +1,4 @@
+accessing
+oldestTweet
+
+	^ self messages oldestOf: self id

Socialmetrica.package/TweetsCollection.class/instance/oldest.st

@@ -2,4 +2,4 @@ accessing
 oldest
 	self messages ifNil: [ ^ nil ].
 	self messages ifEmpty: [ ^ nil ].
-	^ self last
+	^ (self select:[ :tweet | tweet created = ((self collect: [ :each | each created ]) asSortedCollection first)]) first

Socialmetrica.package/TweetsCollection.class/instance/oldestOf..st

@@ -0,0 +1,7 @@
+accessing
+oldestOf: userId
+
+	self messages ifNil: [ ^ nil ].
+	self messages ifEmpty: [ ^ nil ].
+	^ ((self select: [ :tweet | tweet authorId = userId ])
+	 	select: [ :tweet | tweet created = (((self select: [ :each | each authorId = userId ]) collect: [ :each | each created ]) asSortedCollection first)]) first