class: UIPainterView
authorClaus Gittinger <cg@exept.de>
Tue, 07 Jul 2015 12:42:46 +0200
changeset 3223 38d493fcc782
parent 3222 85db156be933
child 3224 98a659b6bd10
class: UIPainterView changed: #generateWindowSpecMethodSourceFor:class:selector: FIX: the generated code may include backslashes (for example, inside a string constant), which should not be xlated to line breaks.
UIPainterView.st
--- a/UIPainterView.st	Tue Jul 07 12:42:08 2015 +0200
+++ b/UIPainterView.st	Tue Jul 07 12:42:46 2015 +0200
@@ -11,6 +11,8 @@
 "
 "{ Package: 'stx:libtool2' }"
 
+"{ NameSpace: Smalltalk }"
+
 UIObjectView subclass:#UIPainterView
 	instanceVariableNames:'treeView listHolder superclassName className methodName
 		categoryName handleColorBlack handleColorWhite handleMasterColor
@@ -1731,13 +1733,15 @@
 
     code := code
             , '\'
-            , '    <resource: #canvas>\\'
+            , '    <resource: #canvas>\\'.
+    code := code withCRs.
+    code := code
             , '    ^ ' , specCode
-            , '\'
+            , '\' withCRs
             , '!! !!'
-            , '\\'.
-
-    ^ code withCRs
+            , '\\' withCRs.
+
+    ^ code
 !
 
 listOfAspects