--- a/AbsoluteTime.st Wed Oct 25 11:18:46 2000 +0200
+++ b/AbsoluteTime.st Wed Oct 25 12:19:28 2000 +0200
@@ -940,6 +940,7 @@
The format is compatible with readFromString:, but not with readFrom:."
self printOn:aStream format:'%(Day)-%(mon)-%(year) %h:%m:%s.%i'
+"/ self printOn:aStream format:'%(mon)/%(Day)/%(year) %h:%m:%s.%i'
"
AbsoluteTime now printOn:Transcript. Transcript cr.
@@ -954,8 +955,7 @@
Date today printOn:Transcript. Transcript cr.
"
- "Modified: 1.7.1996 / 15:20:59 / cg"
-!
+ "Modified: 1.7.1996 / 15:20:59 / cg"!
storeOn:aStream
"store the receiver in a format suitable for reconstruction of the
@@ -1021,5 +1021,5 @@
!AbsoluteTime class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Attic/AbsoluteTime.st,v 1.56 2000-10-25 09:18:46 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Attic/AbsoluteTime.st,v 1.57 2000-10-25 10:19:28 cg Exp $'
! !
--- a/Timestamp.st Wed Oct 25 11:18:46 2000 +0200
+++ b/Timestamp.st Wed Oct 25 12:19:28 2000 +0200
@@ -940,6 +940,7 @@
The format is compatible with readFromString:, but not with readFrom:."
self printOn:aStream format:'%(Day)-%(mon)-%(year) %h:%m:%s.%i'
+"/ self printOn:aStream format:'%(mon)/%(Day)/%(year) %h:%m:%s.%i'
"
AbsoluteTime now printOn:Transcript. Transcript cr.
@@ -954,8 +955,7 @@
Date today printOn:Transcript. Transcript cr.
"
- "Modified: 1.7.1996 / 15:20:59 / cg"
-!
+ "Modified: 1.7.1996 / 15:20:59 / cg"!
storeOn:aStream
"store the receiver in a format suitable for reconstruction of the
@@ -1021,5 +1021,5 @@
!AbsoluteTime class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Timestamp.st,v 1.56 2000-10-25 09:18:46 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Timestamp.st,v 1.57 2000-10-25 10:19:28 cg Exp $'
! !