changed: #expandPlaceholdersWith:
authorClaus Gittinger <cg@exept.de>
Thu, 10 Dec 2009 21:57:54 +0100
changeset 12601 afe93f0d48c5
parent 12600 5d5034da3835
child 12602 dac64854462f
changed: #expandPlaceholdersWith:
CharacterArray.st
--- a/CharacterArray.st	Thu Dec 10 18:59:27 2009 +0100
+++ b/CharacterArray.st	Thu Dec 10 21:57:54 2009 +0100
@@ -4603,7 +4603,7 @@
 
     |stream|
 
-    stream := TextStream on:(self species new:self size + 20).
+    stream := (TextStream ? WriteStream) on:(self species new:self size + 20).
     self expandPlaceholdersWith:argArrayOrDictionary on:stream.
     ^ stream contents.
 
@@ -5744,11 +5744,11 @@
 !CharacterArray class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.424 2009-11-07 10:14:40 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.425 2009-12-10 20:57:54 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.424 2009-11-07 10:14:40 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.425 2009-12-10 20:57:54 cg Exp $'
 ! !
 
 CharacterArray initialize!