oops
authorClaus Gittinger <cg@exept.de>
Fri, 23 Jan 1998 15:12:07 +0100
changeset 464 dd67c1e99fed
parent 463 947f89198464
child 465 1b55cc13793b
oops
UIPainterView.st
--- a/UIPainterView.st	Fri Jan 23 14:59:24 1998 +0100
+++ b/UIPainterView.st	Fri Jan 23 15:12:07 1998 +0100
@@ -827,7 +827,7 @@
     spec := treeView generateFullSpecForComponents:spec.
     str  := WriteStream on:String new.
     UISpecification prettyPrintSpecArray:spec on:str indent:5.
-    specCode := self generateChunkFor:(str contents).
+    specCode := str contents.
 
     (specCode includes:$!!) ifTrue:[
         "/ oops - must be chunk format ...