--- a/Time.st	Thu Jul 15 17:07:02 1999 +0200
+++ b/Time.st	Thu Jul 15 21:45:54 1999 +0200
@@ -380,7 +380,9 @@
 !
 
 printOn:aStream
-    "append a printed representation of the receiver to aStream.
+    "append a user printed representation of the receiver to aStream.
+     The format is suitable for a human - not meant to be read back.
+
      Format is hh:mm:ss either in 12-hour or 24-hour format.
      depending on the setting of LanguageTerritory.
      I dont know what ST-80 does here (12-hour format ?)"
@@ -492,5 +494,5 @@
 !Time class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Time.st,v 1.38 1999-07-13 10:49:22 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Time.st,v 1.39 1999-07-15 19:42:04 cg Exp $'
 ! !