--- a/BrowserView.st Tue Apr 07 17:26:33 1998 +0200
+++ b/BrowserView.st Wed Apr 08 12:04:50 1998 +0200
@@ -8802,9 +8802,11 @@
].
self methodSelectionChanged.
-
- self addToClassHistory: actualClass name asString, ' ', currentSelector
-
+ currentSelector notNil ifTrue:[
+ self addToClassHistory: actualClass name asString, ' ', currentSelector
+ ]
+
+ "Modified: / 7.4.1998 / 10:53:01 / cg"
!
switchToMethodNamed:matchString
@@ -11560,6 +11562,6 @@
!BrowserView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.385 1998-04-07 08:03:17 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.386 1998-04-08 10:04:50 cg Exp $'
! !
BrowserView initialize!