class: TZTimestamp
authorClaus Gittinger <cg@exept.de>
Fri, 07 Nov 2014 19:45:04 +0100
changeset 16976 34cb1703d013
parent 16975 7b1b852a393e
child 16977 deb0f10f246a
class: TZTimestamp comment/format in: #asTZTimestamp: #documentation
TZTimestamp.st
--- a/TZTimestamp.st	Fri Nov 07 19:44:57 2014 +0100
+++ b/TZTimestamp.st	Fri Nov 07 19:45:04 2014 +0100
@@ -58,7 +58,7 @@
         Transcript showCR:Timestamp now asUtcTimestamp
 
       the current time in NewYork:         
-        Transcript showCR:( Timestamp now asTZTimestamp:(Timestamp utcOffsetFrom:'EST') negated ) 
+        Transcript showCR:( Timestamp now asTZTimestamp:(Timestamp utcOffsetFrom:'EST')) 
 
     [author:]
         Claus Gittinger
@@ -126,15 +126,22 @@
         ^ self.
     ].
     ^ super asTZTimestamp:utcOffsetArg
+
+    "what is the time now in NewYork?
+     Timestamp now asTZTimestamp:(Timestamp utcOffsetFrom:'EST') 
+
+     what is the time now in Stuttgart?
+     Timestamp now asTZTimestamp:(Timestamp utcOffsetFrom:'MEZ')  
+    "
 ! !
 
 !TZTimestamp class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/TZTimestamp.st,v 1.2 2014-11-07 17:49:14 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/TZTimestamp.st,v 1.3 2014-11-07 18:45:04 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/TZTimestamp.st,v 1.2 2014-11-07 17:49:14 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/TZTimestamp.st,v 1.3 2014-11-07 18:45:04 cg Exp $'
 ! !