#OTHER by stefan
Use (*WriteStream on:'') instead of (*WriteStream on:String new)
--- a/UIPainterView.st Fri Sep 16 13:05:17 2016 +0200
+++ b/UIPainterView.st Fri Sep 30 16:45:36 2016 +0200
@@ -1701,13 +1701,13 @@
specArray := spec literalArrayEncoding.
- str := WriteStream on:String new.
+ str := WriteStream on:''.
UISpecification prettyPrintSpecArray:specArray on:str indent:4.
specCode := str contents.
(specCode includes:$!!) ifTrue:[
"/ oops - must be chunk format ...
- str := WriteStream on:String new.
+ str := WriteStream on:''.
str nextPutAllAsChunk:specCode.
specCode := str contents.
].