Mercurial Mercurial > hg > stx-libtool2 / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
care for exclas in spec-code (labels with exclamation marks)
authorClaus Gittinger <cg@exept.de>
Thu, 22 Jan 1998 21:06:47 +0100
changeset 458 daa7b41dd2e3
parent 457 0b39d43d4324
child 459 fb5b5ecf7e86
care for exclas in spec-code (labels with exclamation marks)
UIPainterView.st file | annotate | diff | comparison | revisions 
--- a/UIPainterView.st	Thu Jan 22 20:59:48 1998 +0100
+++ b/UIPainterView.st	Thu Jan 22 21:06:47 1998 +0100
@@ -827,7 +827,7 @@
     spec := treeView generateFullSpecForComponents:spec.
     str  := WriteStream on:String new.
     UISpecification prettyPrintSpecArray:spec on:str indent:5.
-    specCode := str contents.
+    specCode := self generateChunkFor:(str contents).
 
     (specCode includes:$!!) ifTrue:[
         "/ oops - must be chunk format ...
hg/stx-libtool2