Socialmetrica/Socialmetrica.package/Timespan.extension/instance/asDatesString.st

9 lines
233 B
Smalltalk
Raw Normal View History

*Socialmetrica
asDatesString
| dates firstDate |
dates := self asDatesStrings.
firstDate := dates first splitOn: ' '.
firstDate removeLast.
firstDate:= '' join: firstDate.
^ firstDate, '→', (dates second copyWithoutAll: ' ')