--- a/BrowserView.st	Fri Jan 03 17:06:58 1997 +0100
+++ b/BrowserView.st	Fri Jan 03 17:31:35 1997 +0100
@@ -1153,11 +1153,14 @@
             str := selectedClass nameWithoutPrefix
         ].
 
-        self switchToClassNamed:str
+        self switchToClassNamed:str.
+        classListView hasSelection ifFalse:[
+            self classCategorySelectionChanged.
+        ]
     ]
 
     "Created: 3.1.1997 / 11:11:13 / cg"
-    "Modified: 3.1.1997 / 11:20:10 / cg"
+    "Modified: 3.1.1997 / 17:27:54 / cg"
 !
 
 checkClassCategorySelected
@@ -8881,6 +8884,6 @@
 !BrowserView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.233 1997-01-03 16:06:58 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.234 1997-01-03 16:31:35 cg Exp $'
 ! !
 BrowserView initialize!