--- a/Filename.st	Sat Nov 22 14:39:35 2003 +0100
+++ b/Filename.st	Sat Nov 22 18:05:22 2003 +0100
@@ -1387,9 +1387,6 @@
     f2 := aFilename asFilename.
     self fileSize > f2 fileSize ifTrue:[^ false].
 
-    buffer1 := ByteArray new:8192.
-    buffer2 := ByteArray new:8192.
-
     [
         s1 := self readStream.
         s1 isNil ifTrue:[
@@ -1402,6 +1399,9 @@
         s1 binary.
         s2 binary.
 
+        buffer1 := ByteArray new:8192.
+        buffer2 := ByteArray new:8192.
+
         [s1 atEnd] whileFalse:[
             n := s1 nextBytes:8192 into:buffer1 startingAt:1.
             n == 0 ifTrue:[
@@ -4985,7 +4985,7 @@
 !Filename class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Filename.st,v 1.269 2003-10-27 21:27:07 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Filename.st,v 1.270 2003-11-22 17:05:22 cg Exp $'
 ! !
 
 Filename initialize!