changed: #doBrowseAspectMethod:nameAs:
whichClassImplements: is obsolete.
--- a/UIPainter.st Mon Oct 12 09:35:01 2009 +0200
+++ b/UIPainter.st Mon Oct 12 18:52:43 2009 +0200
@@ -5035,9 +5035,9 @@
^ self
].
- implementingClass := (cls whichClassImplements:aspect asSymbol).
+ implementingClass := (cls whichClassIncludesSelector:aspect asSymbol).
implementingClass isNil ifTrue:[
- implementingClass := (cls class whichClassImplements:aspect asSymbol).
+ implementingClass := (cls class whichClassIncludesSelector:aspect asSymbol).
].
implementingClass isNil ifTrue:[
answer := OptionBox
@@ -6762,6 +6762,10 @@
version
^ '$Header$'
+!
+
+version_CVS
+ ^ '$Header$'
! !
UIPainter initialize!