30 lines
994 B
Smalltalk
30 lines
994 B
Smalltalk
|
accessing
|
||
|
|
metricsFromNitterHtml: xmlItem
|
||
|
|
|
||
|
|
self metrics
|
||
|
|
at: 'comment'
|
||
|
|
put:
|
||
|
|
(((xmlItem xpath: '//div[@class="icon-container"]') select: [ :item |
|
||
|
|
item asString includesSubstring: 'comment' ]) stringValue
|
||
|
|
trimmed copyReplaceAll: ',' with: '');
|
||
|
|
at: 'retweet'
|
||
|
|
put:
|
||
|
|
(((xmlItem xpath: '//div[@class="icon-container"]') select: [ :item |
|
||
|
|
item asString includesSubstring: 'retweet' ]) stringValue
|
||
|
|
trimmed copyReplaceAll: ',' with: '');
|
||
|
|
at: 'quote'
|
||
|
|
put:
|
||
|
|
(((xmlItem xpath: '//div[@class="icon-container"]') select: [ :item |
|
||
|
|
item asString includesSubstring: 'quote' ]) stringValue trimmed
|
||
|
|
copyReplaceAll: ','
|
||
|
|
with: '');
|
||
|
|
at: 'heart'
|
||
|
|
put:
|
||
|
|
(((xmlItem xpath: '//div[@class="icon-container"]') select: [ :item |
|
||
|
|
item asString includesSubstring: 'heart' ]) stringValue trimmed
|
||
|
|
copyReplaceAll: ','
|
||
|
|
with: '').
|
||
|
|
|
||
|
|
metadata
|
||
|
|
at: 'pinned'
|
||
|
|
put: (xmlItem xpath: '//div[@class="pinned"]') stringValue trimmed = 'Pinned Tweet'
|