equal
deleted
inserted
replaced
253 ! |
253 ! |
254 |
254 |
255 timestamp |
255 timestamp |
256 timestamp notNil ifTrue:[^ timestamp]. |
256 timestamp notNil ifTrue:[^ timestamp]. |
257 date isNil ifTrue:[^ nil]. |
257 date isNil ifTrue:[^ nil]. |
258 time isNil ifTrue:[^ date asTimestamp]. |
258 time isNil ifTrue:[ |
|
259 Error handle:[:ex | |
|
260 ^ nil |
|
261 ] do:[ |
|
262 ^ date asTimestamp |
|
263 ]. |
|
264 ]. |
259 ^ Timestamp fromDate:date andTime:time |
265 ^ Timestamp fromDate:date andTime:time |
260 ! |
266 ! |
261 |
267 |
262 timestamp:aTimestamp |
268 timestamp:aTimestamp |
263 timestamp := aTimestamp |
269 timestamp := aTimestamp |