--- a/Stream.st	Thu Oct 23 17:45:35 2003 +0200
+++ b/Stream.st	Fri Oct 24 08:48:31 2003 +0200
@@ -1606,7 +1606,7 @@
     "read from the receiver, and write all data up to the end to another stream.
      Return the number of bytes which have been transferred"
 
-    ^ self copyToEndInto:outStream bufferSize:1024
+    ^ self copyToEndInto:outStream bufferSize:(8*1024)
 !
 
 copyToEndInto:outStream bufferSize:bufferSize
@@ -2615,7 +2615,7 @@
 !Stream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Stream.st,v 1.123 2003-08-11 14:46:05 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Stream.st,v 1.124 2003-10-24 06:48:31 cg Exp $'
 ! !
 
 Stream initialize!