# HG changeset patch # User tz # Date 887573557 -3600 # Node ID 06bf664cab3cf798436f83ca827373c1aabab6dd # Parent 56a4339cbdbeb337ad64616065f8f1f349ac2359 the same mistake once again 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 ! !