--- a/BrowserView.st	Mon Dec 23 13:23:40 1996 +0100
+++ b/BrowserView.st	Mon Dec 23 16:05:31 1996 +0100
@@ -7525,9 +7525,12 @@
 
     nm := aClass nameWithoutPrefix.
     ns := aClass nameSpace.
+    ns isNil ifTrue:[
+        ^ nm
+    ].
 
     currentNamespace = '* all *' ifTrue:[
-        ns == Smalltalk ifTrue:[
+        (ns == Smalltalk) ifTrue:[
             ^ nm
         ].
         ^ ns name , '::' , nm   "/ full name
@@ -8799,6 +8802,6 @@
 !BrowserView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.229 1996-12-23 12:23:40 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.230 1996-12-23 15:05:31 ca Exp $'
 ! !
 BrowserView initialize!