author | Stefan Vogel <sv@exept.de> |
Thu, 25 Apr 2013 15:10:44 +0200 | |
changeset 2997 | 6cf3623a78ed |
parent 2996 | a1090695cfbc |
child 2998 | 91c12c87cde1 |
UIPainterView.st | file | annotate | diff | comparison | revisions |
--- a/UIPainterView.st Fri Apr 19 11:36:27 2013 +0200 +++ b/UIPainterView.st Thu Apr 25 15:10:44 2013 +0200 @@ -1114,7 +1114,7 @@ (aFilterOrEmpty isNil or:[aFilterOrEmpty includes:aSel]) ifTrue:[ (definedMethodSelectors includes:aSel) ifFalse:[ - aspect := (aSel copyWithoutLast:1) asSymbol. + aspect := (aSel copyButLast:1) asSymbol. thisCode := (self generateAspectSetMethodFor:aspect spec:protoSpec inClass:cls). codePieces add:thisCode. definedMethodSelectors add:aSel.