5 lines
240 B
Smalltalk
5 lines
240 B
Smalltalk
accessing
|
|
created
|
|
created class = DateAndTime ifTrue: [ ^ created ].
|
|
^ (created endsWith: 'GMT')
|
|
ifTrue: [ ^ DateAndTime fromString: ((created splitOn: $,) second withoutSuffix: 'GMT') ] ifFalse: [ ^ DateAndTime fromString: created ]. |