--- a/Metaclass.st	Fri Mar 05 17:33:50 1999 +0100
+++ b/Metaclass.st	Fri Mar 05 17:56:03 1999 +0100
@@ -815,6 +815,7 @@
         newClass setName:classSymbol.
         recompileGlobalAccessTo := nil.
     ].
+
     newClass setComment:newComment category:categoryString.
 
     oldClass notNil ifTrue:[
@@ -964,7 +965,7 @@
             ]
         ].
 
-        namespace isNamespace ifTrue:[
+"/        namespace isNamespace ifTrue:[
             "/ be very careful, when adding classes
             "/ to a namespace. When adding, all methods within the
             "/ same namespace which access the unprefixed-global
@@ -975,7 +976,7 @@
                      in:namespace
                      except:newClass
             ].
-        ].
+"/        ].
 
         ^ newClass
     ].
@@ -1988,6 +1989,6 @@
 !Metaclass class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Metaclass.st,v 1.136 1999-03-05 13:52:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Metaclass.st,v 1.137 1999-03-05 16:56:03 cg Exp $'
 ! !
 Metaclass initialize!