Merge e98fd45083

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

@@ -10,5 +10,5 @@ getLocalMessages
 	tweetsWithAntecesor := allTweets select: [ :each | each timelines isNotEmpty and: [ each timelines keys first = self userName ]].
 	myTweets messages: tweetsWithAntecesor.
 	self messages: myTweets.
-	^ self messages
+	^ self
 	

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

@@ -1,6 +1,7 @@
 accessing
 retrieveContents
 	self userName ifNil: [^ self].
+"	self retrieveLocalContents ifNotNil: [ ^ self ]."
 	^ self
 		id;
 		name;

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

@@ -1,3 +1,6 @@
 accessing
 retrieveLocalContents
-	^ self class stored detect: [ :each | each userName = self userName ]
+	| profileTemp |
+	profileTemp := self class stored detect: [ :each | each userName = self userName ].
+	profileTemp getLocalMessages.
+	^ profileTemp

Socialmetrica.package/Tweet.class/instance/created.st

@@ -1,5 +1,5 @@
 accessing
 created
 	created class = DateAndTime ifTrue: [ ^ created ].
-	^ (created endsWith: 'GMT') ifTrue: [ ^ DateAndTime fromString: ((created splitOn: $,) second withoutSuffix: 'GMT') ].
-	"^ DateAndTime fromString: created"
+	^ (created endsWith: 'GMT') 
+		ifTrue: [ ^ DateAndTime fromString: ((created splitOn: $,) second withoutSuffix: 'GMT') ]		ifFalse: [ ^ DateAndTime fromString: created ].

Socialmetrica.package/TwitterUser.class/instance/asCardElement.st

@@ -41,7 +41,7 @@ asCardElement
 							BrButton new
 								aptitude: BrGlamorousButtonWithLabelAptitude new;
 								label: 'Tweets';
-								action: [ :e | e phlow spawnObject: self getMessages ].	
+								action: [ :e | e phlow spawnObject: self messages ].	
 							BrButton new
 								aptitude: BrGlamorousButtonWithLabelAptitude new;
 								label: 'Web view';