--- a/Timestamp.st	Wed May 07 22:34:56 2008 +0200
+++ b/Timestamp.st	Wed May 07 22:35:44 2008 +0200
@@ -988,6 +988,17 @@
     "
 !
 
+asLocalTimestamp
+    "convert an utc timestamp to local time "
+
+    ^ self - self utcOffset
+
+    "
+     Timestamp now asUtcTimestamp
+     Timestamp now asUtcTimestamp asLocalTimestamp
+    "
+!
+
 asMilliseconds
     "return the number of milliSeconds elapsed since whatever time the
      OperatingSystem bases its time upon. Since this is totally
@@ -1038,7 +1049,7 @@
     ^ self + self utcOffset
 
     "
-       Timestamp now asUtcTimestamp
+     Timestamp now asUtcTimestamp
     "
 !
 
@@ -1387,7 +1398,7 @@
 !Timestamp class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Timestamp.st,v 1.112 2007-10-04 11:33:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Timestamp.st,v 1.113 2008-05-07 20:35:44 cg Exp $'
 ! !
 
 Timestamp initialize!