Fixing quotes report data and Modifying retweets report data.
This commit is contained in:
parent
1dec7081e4
commit
d2025d8aa9
@ -4,8 +4,8 @@ quotesReportData
|
||||
| tempDict labels xAxis |
|
||||
tempDict := self quotesSortedByOccurrences.
|
||||
|
||||
tempDict size > 50 ifTrue: [
|
||||
tempDict := (tempDict associations copyFrom: 1 to: 50) asOrderedDictionary ].
|
||||
tempDict size > 10 ifTrue: [
|
||||
tempDict := (tempDict associations copyFrom: 1 to: 10) asOrderedDictionary ].
|
||||
|
||||
labels := tempDict keys.
|
||||
labels := labels collect: [ :profile | ($' asString), '@', profile, ($' asString) ].
|
||||
|
@ -3,6 +3,10 @@ retweetsReportData
|
||||
|
||||
| tempDict labels xAxis |
|
||||
tempDict := self retweetsSortedByOccurrences.
|
||||
|
||||
tempDict size > 10 ifTrue: [
|
||||
tempDict := (tempDict associations copyFrom: 1 to: 10) asOrderedDictionary ].
|
||||
|
||||
labels := tempDict keys.
|
||||
labels := labels collect: [ :profile | ($' asString), '@', profile, ($' asString) ].
|
||||
xAxis := tempDict values.
|
||||
|
Loading…
Reference in New Issue
Block a user