accessing
quotes
self messages ifEmpty: [ self getMessages ].
^ TweetsCollection new
messages: (self messages
select: [ :each |
(each metadata at: 'quote') isNotEmpty and: [ each user userName = self userName] ]);
yourself