checkin from browser
authorClaus Gittinger <cg@exept.de>
Sat, 04 Jan 1997 20:36:58 +0100
changeset 2058 09ea6d9cd607
parent 2057 35003ed4b817
child 2059 c58962259667
checkin from browser
NameSpace.st
Namespace.st
--- a/NameSpace.st	Sat Jan 04 19:58:25 1997 +0100
+++ b/NameSpace.st	Sat Jan 04 20:36:58 1997 +0100
@@ -239,16 +239,17 @@
 
 !Namespace class methodsFor:'fileOut'!
 
-basicFileOutDefinitionOn:aStream
+fileOutDefinitionOn:aStream
     "redefined to generate another definition message"
 
     self == Namespace ifTrue:[
-        super basicFileOutDefinitionOn:aStream
+        super fileOutDefinitionOn:aStream
     ] ifFalse:[
         aStream nextPutAll:('Namespace name:' , self name storeString)
     ]
 
     "Modified: 8.11.1996 / 21:39:03 / cg"
+    "Created: 4.1.1997 / 20:36:32 / cg"
 ! !
 
 !Namespace class methodsFor:'printing & storing'!
@@ -299,5 +300,5 @@
 !Namespace class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/NameSpace.st,v 1.17 1997-01-04 15:51:37 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/NameSpace.st,v 1.18 1997-01-04 19:36:58 cg Exp $'
 ! !
--- a/Namespace.st	Sat Jan 04 19:58:25 1997 +0100
+++ b/Namespace.st	Sat Jan 04 20:36:58 1997 +0100
@@ -239,16 +239,17 @@
 
 !Namespace class methodsFor:'fileOut'!
 
-basicFileOutDefinitionOn:aStream
+fileOutDefinitionOn:aStream
     "redefined to generate another definition message"
 
     self == Namespace ifTrue:[
-        super basicFileOutDefinitionOn:aStream
+        super fileOutDefinitionOn:aStream
     ] ifFalse:[
         aStream nextPutAll:('Namespace name:' , self name storeString)
     ]
 
     "Modified: 8.11.1996 / 21:39:03 / cg"
+    "Created: 4.1.1997 / 20:36:32 / cg"
 ! !
 
 !Namespace class methodsFor:'printing & storing'!
@@ -299,5 +300,5 @@
 !Namespace class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Attic/Namespace.st,v 1.17 1997-01-04 15:51:37 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Attic/Namespace.st,v 1.18 1997-01-04 19:36:58 cg Exp $'
 ! !