--- a/BrowserView.st	Wed Oct 21 20:54:39 1998 +0200
+++ b/BrowserView.st	Tue Oct 27 19:34:07 1998 +0100
@@ -893,23 +893,26 @@
     ].
 
     something == #statistics ifTrue:[
-        changedObject isMethod ifTrue:[
-            (changedObject == currentMethod 
-            or:[currentMethod isWrapped 
-                and:[currentMethod originalMethod == changedObject]]) 
-            ifTrue:[
-                self refetchMethod.
-                "/ just in case, this is a method which is used during
-                "/ the update ...
-                changedObject removeDependent:self.
-                self updateMethodListWithScroll:false keepSelection:true.
-                changedObject addDependent:self.
+        currentMethod notNil ifTrue:[
+            changedObject isMethod ifTrue:[
+                (changedObject == currentMethod 
+                or:[currentMethod isWrapped 
+                    and:[currentMethod originalMethod == changedObject]]) 
+                ifTrue:[
+                    self refetchMethod.
+                    "/ just in case, this is a method which is used during
+                    "/ the update ...
+                    changedObject removeDependent:self.
+                    self updateMethodListWithScroll:false keepSelection:true.
+                    changedObject addDependent:self.
+                ].
             ].
         ].
     ]
 
     "Created: / 4.1.1997 / 13:54:00 / cg"
     "Modified: / 30.7.1998 / 17:33:03 / cg"
+    "Modified: / 27.10.1998 / 12:02:05 / ps"
 !
 
 refetchClass
@@ -12583,6 +12586,6 @@
 !BrowserView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.459 1998-10-21 18:54:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.460 1998-10-27 18:34:07 cg Exp $'
 ! !
 BrowserView initialize!