--- a/Tools__NewSystemBrowser.st	Tue Sep 25 14:02:08 2001 +0200
+++ b/Tools__NewSystemBrowser.st	Tue Sep 25 14:45:13 2001 +0200
@@ -24710,7 +24710,7 @@
 
     (aClass isNameSpace and:[aClass ~~ Smalltalk]) ifTrue:[
         orgMode ~~ #namespace ifTrue:[      
-            (self confirm:'selected class is a namespace - switch view mode ?') ifTrue:[
+            (self confirm:'Browser: class is a namespace - switch organizers display mode ?') ifTrue:[
                 self organizerMode value:#namespace.
                 orgMode := self organizerMode value.
             ]
@@ -24734,7 +24734,11 @@
             self selectedCategories value:(OrderedCollection with:cat).
         ]
     ] ifFalse:[ orgMode == #namespace ifTrue:[
-        nsName := aClass nameSpace name.
+        aClass isNameSpace ifTrue:[
+            nsName := aClass name.
+        ] ifFalse:[
+            nsName := aClass nameSpace name.
+        ].
         (self selectedNamespacesValue includes:nsName) ifFalse:[
             self selectedNamespaces value:(OrderedCollection with:nsName).
         ]
@@ -49464,6 +49468,6 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.173 2001-09-25 12:02:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.174 2001-09-25 12:44:51 cg Exp $'
 ! !
 NewSystemBrowser initialize!