--- a/Filename.st Mon Oct 05 10:37:38 1998 +0200
+++ b/Filename.st Mon Oct 05 10:38:06 1998 +0200
@@ -1084,6 +1084,8 @@
s2 isNil ifTrue:[
^ self error:('cannot open %1 for reading' bindWith:aFilename asFilename name)
].
+ s1 binary.
+ s2 binary.
[s1 atEnd] whileFalse:[
n := s1 nextBytes:8192 into:buffer1 startingAt:1.
@@ -3138,6 +3140,6 @@
!Filename class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Filename.st,v 1.141 1998-10-05 08:37:38 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Filename.st,v 1.142 1998-10-05 08:38:06 cg Exp $'
! !
Filename initialize!