--- a/FileBrowser.st Mon Jun 30 20:52:37 1997 +0200
+++ b/FileBrowser.st Mon Jun 30 21:03:19 1997 +0200
@@ -2944,8 +2944,8 @@
^ nil
].
- buffer := String new:300.
- n := s nextBytes:300 into:buffer.
+ buffer := String new:4096.
+ n := s nextBytes:4096 into:buffer.
s close.
enc := encoding.
@@ -3051,7 +3051,7 @@
].
"Created: 19.6.1996 / 09:39:52 / cg"
- "Modified: 30.6.1997 / 19:21:51 / cg"
+ "Modified: 30.6.1997 / 21:00:46 / cg"
!
writeFile:fileName text:someText encoding:encoding
@@ -3563,5 +3563,5 @@
!FileBrowser class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.169 1997-06-30 18:52:37 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.170 1997-06-30 19:03:19 cg Exp $'
! !