diff --git a/Socialmetrica.package/NitterUser.class/instance/configureDefaultReportingPeriod.st b/Socialmetrica.package/NitterUser.class/instance/configureDefaultReportingPeriod.st new file mode 100644 index 0000000..f041732 --- /dev/null +++ b/Socialmetrica.package/NitterUser.class/instance/configureDefaultReportingPeriod.st @@ -0,0 +1,8 @@ +accessing +configureDefaultReportingPeriod + [ config at: 'reportingPeriod' ] + onErrorDo: [ self config + at: 'reportingPeriod' + put: (Timespan + starting: messages oldest created asDateAndTime + ending: messages newest created asDateAndTime + 1 minute) ] \ No newline at end of file diff --git a/Socialmetrica.package/NitterUser.class/instance/messages.st b/Socialmetrica.package/NitterUser.class/instance/messages.st index b0f5c5f..45af756 100644 --- a/Socialmetrica.package/NitterUser.class/instance/messages.st +++ b/Socialmetrica.package/NitterUser.class/instance/messages.st @@ -1,13 +1,12 @@ accessing messages - messages ifNil: [ messages := TweetsCollection new ]. messages ifEmpty: [ self getLocalMessages ]. messages ifEmpty: [ self getRemoteMessagesFromHtml ]. - [ config at: 'reportingPeriod' ] - onErrorDo: [ self config - at: 'reportingPeriod' - put: (Timespan - starting: (messages oldest created asDateAndTime) - ending: (messages newest created asDateAndTime + 1 minute)) ]. - ^ messages select: [ :message | message created between: self reportingPeriod start and: self reportingPeriod end ] \ No newline at end of file + config at: 'reportingPeriod' ifAbsent: [ ^ messages ]. + "self configureDefaultReportingPeriod." + ^ messages + select: [ :message | + message created + between: self reportingPeriod start + and: self reportingPeriod end ] \ No newline at end of file