diff --git a/Socialmetrica.package/NitterUser.class/instance/replies.st b/Socialmetrica.package/NitterUser.class/instance/replies.st index 47f42c6..04d73ea 100644 --- a/Socialmetrica.package/NitterUser.class/instance/replies.st +++ b/Socialmetrica.package/NitterUser.class/instance/replies.st @@ -3,5 +3,6 @@ replies self messages ifEmpty: [ self getMessages ]. ^ TweetsCollection new - messages: (self messages select: [ :each | (each metadata at: 'replie to') isNotEmpty ]); + messages: (self messages select: [ :each | (each metadata at: 'replie to') isNotEmpty + and: [ each authorId = self id ]]); yourself \ No newline at end of file diff --git a/Socialmetrica.package/TweetsCollection.class/instance/messages.st b/Socialmetrica.package/TweetsCollection.class/instance/messages.st index 268e962..f8dce4d 100644 --- a/Socialmetrica.package/TweetsCollection.class/instance/messages.st +++ b/Socialmetrica.package/TweetsCollection.class/instance/messages.st @@ -1,3 +1,3 @@ accessing messages - ^ array \ No newline at end of file + ^ array select: [ :tweet | tweet isNotNil ]. \ No newline at end of file diff --git a/Socialmetrica.package/TweetsCollection.class/instance/oldest.st b/Socialmetrica.package/TweetsCollection.class/instance/oldest.st index 4c2e193..430aa4b 100644 --- a/Socialmetrica.package/TweetsCollection.class/instance/oldest.st +++ b/Socialmetrica.package/TweetsCollection.class/instance/oldest.st @@ -1,3 +1,3 @@ accessing oldest - ^ self messages last \ No newline at end of file + ^ self last \ No newline at end of file