diff -r 56a4339cbdbe -r 06bf664cab3c ResourceSelectionBrowser.st --- a/ResourceSelectionBrowser.st Sun Feb 15 21:00:42 1998 +0100 +++ b/ResourceSelectionBrowser.st Sun Feb 15 21:12:37 1998 +0100 @@ -404,11 +404,10 @@ (self selectionOfClass value notNil and: [(cls := Smalltalk at: self selectionOfClass value name) isClass and: - [(cls class implements: (sel := self valueOfSelector value) asSymbol) and: - [accept value]]]) + [accept value]]) ifTrue: [ - ^cls name, ' ', sel + ^cls name, ' ', self valueOfSelector value ]. ^nil ! !