6 lines
170 B
Smalltalk
6 lines
170 B
Smalltalk
accessing
|
|
tweets
|
|
self messages ifEmpty: [ self getMessages ].
|
|
^ TweetsCollection new
|
|
messages: (self messages select: [ :each | each authorId = self id ]);
|
|
yourself |