class: UIPainterView
authorClaus Gittinger <cg@exept.de>
Wed, 05 Mar 2014 23:14:25 +0100
changeset 3092 c327e636e6a3
parent 3091 4ec02687f35f
child 3093 6cbe0ee42b96
class: UIPainterView changed: #generateAspectMethodCodeFiltering: use asMutator instead of (a,':') asSymbol
UIPainterView.st
--- a/UIPainterView.st	Tue Mar 04 17:07:56 2014 +0100
+++ b/UIPainterView.st	Wed Mar 05 23:14:25 2014 +0100
@@ -1108,7 +1108,7 @@
                 ].
 
         "/ exported aspects - need setter methods
-        exportSels := (treeView exportedAspects ? #()) collect:[:entry | (entry subAspect , ':') asSymbol].
+        exportSels := (treeView exportedAspects ? #()) collect:[:entry | (entry subAspect) asMutator].
         self generateCodeFrom:exportSels in:cls
                 do:[:aSel|
                     |aspect|