#BUGFIX by cg
authorClaus Gittinger <cg@exept.de>
Thu, 24 Nov 2016 14:02:48 +0100
changeset 4163 32d1c2c5719b
parent 4161 55ad833b981e
child 4164 640b3d01efb9
child 4167 ee0c93ae59e0
#BUGFIX by cg class: VersionInfo changed: #timestamp
VersionInfo.st
--- a/VersionInfo.st	Fri Nov 18 18:06:46 2016 +0100
+++ b/VersionInfo.st	Thu Nov 24 14:02:48 2016 +0100
@@ -255,7 +255,13 @@
 timestamp
     timestamp notNil ifTrue:[^ timestamp].
     date isNil ifTrue:[^ nil].
-    time isNil ifTrue:[^ date asTimestamp].
+    time isNil ifTrue:[
+        Error handle:[:ex |
+            ^ nil
+        ] do:[    
+            ^ date asTimestamp
+        ].
+    ].
     ^ Timestamp fromDate:date andTime:time
 !