--- 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!