dont clobber acceptAction if aspect is ninNil (in methodCategorySelectionChanged)
--- a/BrowserView.st Sun Feb 11 15:45:40 1996 +0100
+++ b/BrowserView.st Sun Feb 11 16:15:39 1996 +0100
@@ -4278,7 +4278,9 @@
methodCategoryListView selectElement:currentMethodCategory
].
- self setAcceptAndExplainActionsForMethod.
+ aspect isNil ifTrue:[
+ self setAcceptAndExplainActionsForMethod.
+ ].
self hilightMethodsInMethodCategoryList:false inMethodList:true.
]
@@ -6777,6 +6779,6 @@
!BrowserView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.99 1996-02-11 14:45:40 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.100 1996-02-11 15:15:39 cg Exp $'
! !
BrowserView initialize!
--- a/BrwsrView.st Sun Feb 11 15:45:40 1996 +0100
+++ b/BrwsrView.st Sun Feb 11 16:15:39 1996 +0100
@@ -4278,7 +4278,9 @@
methodCategoryListView selectElement:currentMethodCategory
].
- self setAcceptAndExplainActionsForMethod.
+ aspect isNil ifTrue:[
+ self setAcceptAndExplainActionsForMethod.
+ ].
self hilightMethodsInMethodCategoryList:false inMethodList:true.
]
@@ -6777,6 +6779,6 @@
!BrowserView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/Attic/BrwsrView.st,v 1.99 1996-02-11 14:45:40 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Attic/BrwsrView.st,v 1.100 1996-02-11 15:15:39 cg Exp $'
! !
BrowserView initialize!