Class.st
changeset 7658 b009bc99dd47
parent 7657 3e4d5be0096d
child 7693 212597279482
--- a/Class.st	Fri Oct 10 08:57:01 2003 +0200
+++ b/Class.st	Fri Oct 10 09:05:57 2003 +0200
@@ -3717,13 +3717,6 @@
     "Modified: 22.1.1997 / 18:43:52 / cg"
 !
 
-topNameSpace
-    "return the nameSpace of my topOwningClass (if private) or my own nameSpace."
-
-    self isPrivate ifTrue:[^ self topOwningClass topNameSpace].
-    ^ self nameSpace
-!
-
 wasAutoloaded
     "return true, if this class came into the system via an
      autoload; false otherwise.
@@ -4875,5 +4868,5 @@
 !Class class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.446 2003-10-10 06:57:01 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.447 2003-10-10 07:05:57 cg Exp $'
 ! !