--- a/Collection.st	Wed Mar 17 17:16:31 2004 +0100
+++ b/Collection.st	Wed Mar 17 17:17:23 2004 +0100
@@ -2068,7 +2068,7 @@
         ^ '#("recursive")'
     ].
 
-    buffer := '' writeStream.
+    buffer := String writeStream.
     buffer nextPutAll:(self displayStringName); nextPutAll:'('.
     noneYet := true.
     total := 0.
@@ -2723,7 +2723,7 @@
 !Collection class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Collection.st,v 1.158 2004-03-12 18:46:41 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Collection.st,v 1.159 2004-03-17 16:15:36 cg Exp $'
 ! !
 
 Collection initialize!