author | Claus Gittinger <cg@exept.de> |
Fri, 23 Jan 1998 15:12:07 +0100 | |
changeset 464 | dd67c1e99fed |
parent 463 | 947f89198464 |
child 465 | 1b55cc13793b |
UIPainterView.st | file | annotate | diff | comparison | revisions |
--- 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 ...