Remove unused method var
authorStefan Vogel <sv@exept.de>
Mon, 15 Jul 2002 13:56:52 +0200
changeset 6634 44f20d8db2d4
parent 6633 ef36668d5c96
child 6635 3b5525d83d5d
Remove unused method var
AbsoluteTime.st
Timestamp.st
--- a/AbsoluteTime.st	Mon Jul 15 13:55:28 2002 +0200
+++ b/AbsoluteTime.st	Mon Jul 15 13:56:52 2002 +0200
@@ -810,11 +810,11 @@
 addPrintBindingsTo:dict
     "private print support"
 
-    |d m y s|
-
     self asDate addPrintBindingsTo:dict.
     super addPrintBindingsTo:dict.
 
+"/    |d m y s|
+"/
 "/    OperatingSystem computeDatePartsOf:osTime for:[
 "/        :year :month :day | d := day. m := month. y := year.
 "/    ].
@@ -1005,5 +1005,5 @@
 !AbsoluteTime class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Attic/AbsoluteTime.st,v 1.65 2002-07-15 09:22:35 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Attic/AbsoluteTime.st,v 1.66 2002-07-15 11:56:52 stefan Exp $'
 ! !
--- a/Timestamp.st	Mon Jul 15 13:55:28 2002 +0200
+++ b/Timestamp.st	Mon Jul 15 13:56:52 2002 +0200
@@ -810,11 +810,11 @@
 addPrintBindingsTo:dict
     "private print support"
 
-    |d m y s|
-
     self asDate addPrintBindingsTo:dict.
     super addPrintBindingsTo:dict.
 
+"/    |d m y s|
+"/
 "/    OperatingSystem computeDatePartsOf:osTime for:[
 "/        :year :month :day | d := day. m := month. y := year.
 "/    ].
@@ -1005,5 +1005,5 @@
 !AbsoluteTime class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Timestamp.st,v 1.65 2002-07-15 09:22:35 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Timestamp.st,v 1.66 2002-07-15 11:56:52 stefan Exp $'
 ! !