--- a/BrowserView.st	Fri Aug 20 18:14:05 1999 +0200
+++ b/BrowserView.st	Sat Aug 21 12:54:04 1999 +0200
@@ -5687,7 +5687,7 @@
     superPackage := aSuperClass package copy replaceAll:$/ with:$..
     superPackage = categoryString ifFalse:[
         superPackage = 'java.lang' ifFalse:[
-            className := aSuperClass name.
+            className := aSuperClass name asString copy replaceAll:$/ with:$..
         ].
     ].
 
@@ -13837,6 +13837,6 @@
 !BrowserView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.545 1999-08-20 16:14:05 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.546 1999-08-21 10:54:04 cg Exp $'
 ! !
 BrowserView initialize!