2022-06-17 01:44:15 +00:00
|
|
|
accessing
|
|
|
|
|
splitByDays
|
|
|
|
|
|
|
|
|
|
| response spans |
|
2022-06-17 23:11:07 +00:00
|
|
|
response := OrderedDictionary new.
|
2022-06-17 01:44:15 +00:00
|
|
|
self timeSpansByDays doWithIndex: [ :span :i |
|
|
|
|
|
response
|
|
|
|
|
at: span asDate asString
|
|
|
|
|
put: (self select: [ :message | span includes: (message created asDateAndTime)])
|
|
|
|
|
].
|
|
|
|
|
^ response
|
