--- a/BrowserView.st	Thu Jul 16 18:25:18 1998 +0200
+++ b/BrowserView.st	Thu Jul 16 18:28:50 1998 +0200
@@ -10529,8 +10529,10 @@
                     codeView modified:false.
                     codeModified := false.
                     currentMethod := actualClass compiledMethodAt:currentSelector.
-                    (methodCategoryListView list includes:cat) ifFalse:[
-                        self updateMethodCategoryListWithScroll:false.
+                    methodCategoryListView notNil ifTrue:[    
+                        (methodCategoryListView list includes:cat) ifFalse:[
+                            self updateMethodCategoryListWithScroll:false.
+                        ]
                     ].
                     self updateMethodListWithScroll:false keepSelection:(rslt == currentMethod).
                     self normalLabel.
@@ -10548,7 +10550,7 @@
                                 forClass:actualClass)
     ].
 
-    "Modified: / 16.7.1998 / 18:21:41 / cg"
+    "Modified: / 16.7.1998 / 18:26:30 / cg"
 !
 
 setDoitActionForClass
@@ -11789,6 +11791,6 @@
 !BrowserView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.426 1998-07-16 16:25:18 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.427 1998-07-16 16:28:50 cg Exp $'
 ! !
 BrowserView initialize!