--- a/UIPainterView.st Mon May 19 12:10:22 2003 +0200
+++ b/UIPainterView.st Tue May 20 18:55:39 2003 +0200
@@ -609,7 +609,7 @@
aspectSelectorsAndTypesDo:aTwoArgBlock
"evaluate aBlock for every aspect methods selector; 2nd arg describes the aspects type"
- |cls methods selector protoSpec|
+ |cls selector protoSpec|
className isNil ifTrue:[
self warn:'No class defined !!'.
@@ -657,8 +657,6 @@
aTwoArgBlock value:(selector asSymbol) value:#menu
].
].
-
- ^ methods
!
generateActionMethodFor:aspect spec:protoSpec inClass:targetClass