TZTimestamp.st
changeset 17103 d390437c201f
parent 17050 f421040c58ae
child 17134 161e73014492
--- a/TZTimestamp.st	Thu Nov 20 02:51:05 2014 +0100
+++ b/TZTimestamp.st	Thu Nov 20 13:06:04 2014 +0100
@@ -110,7 +110,9 @@
      If utcOffset is negative, the local timezone is east of Greenwich.
      If utcOffset is positive, the local timezone is west of Greenwich."
 
-    utcOffset := seconds
+    utcOffset := seconds asInteger.
+
+    "Modified: / 20-11-2014 / 13:05:48 / sr"
 ! !
 
 !TZTimestamp methodsFor:'converting'!
@@ -152,10 +154,10 @@
 !TZTimestamp class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/TZTimestamp.st,v 1.7 2014-11-13 12:55:02 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/TZTimestamp.st,v 1.8 2014-11-20 12:06:04 sr Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/TZTimestamp.st,v 1.7 2014-11-13 12:55:02 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/TZTimestamp.st,v 1.8 2014-11-20 12:06:04 sr Exp $'
 ! !