Date.st
changeset 5515 4adb4b3a7475
parent 5282 d38c5238399c
child 5548 eead51e4752e
--- a/Date.st	Fri Aug 11 19:38:27 2000 +0200
+++ b/Date.st	Fri Aug 11 19:40:40 2000 +0200
@@ -10,6 +10,8 @@
  hereby transferred.
 "
 
+"{ Package: 'stx:libbasic' }"
+
 Magnitude subclass:#Date
 	instanceVariableNames:'dateEncoding'
 	classVariableNames:'DayNames MonthNames DayAbbrevs MonthAbbrevs EnvironmentChange'
@@ -790,6 +792,16 @@
     "
 ! !
 
+!Date methodsFor:'Compatibility - ST80'!
+
+shortPrintString
+    "dummy - for now"
+
+    ^ self printString
+
+    "Created: 20.6.1997 / 17:16:48 / cg"
+! !
+
 !Date methodsFor:'Compatibility - Squeak'!
 
 mmddyyyy
@@ -807,16 +819,6 @@
     "
 ! !
 
-!Date methodsFor:'Compatibility ST80'!
-
-shortPrintString
-    "dummy - for now"
-
-    ^ self printString
-
-    "Created: 20.6.1997 / 17:16:48 / cg"
-! !
-
 !Date methodsFor:'accessing'!
 
 abbreviatedDayName
@@ -1407,6 +1409,6 @@
 !Date class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Date.st,v 1.51 2000-02-25 10:42:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Date.st,v 1.52 2000-08-11 17:39:34 cg Exp $'
 ! !
 Date initialize!