Skip to content

Commit e628eef

Browse files
author
Johan Brichau
committed
Fix writeFileStreamOn:do:binary: in Squeak
1 parent f20c01f commit e628eef

File tree

2 files changed

+6
-6
lines changed

2 files changed

+6
-6
lines changed

‎repository/Grease-Squeak5-Core.package/GRSqueakPlatform.class/instance/writeFileStreamOn.do.binary..st‎

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -1,8 +1,8 @@
1-
as yet unclassified
1+
files
22
writeFileStreamOn: aString do: aBlock binary: aBoolean
33
| stream |
44
stream := aBoolean
5-
ifTrue: [ (MultiByteFileStream fileNamed: aString) ascii; wantsLineEndConversion: true; yourself ]
6-
ifFalse: [ (FileStream fileNamed: aString) binary ].
5+
ifTrue: [ (FileStream fileNamed: aString) binary ]
6+
ifFalse: [ (MultiByteFileStream fileNamed: aString) ascii; wantsLineEndConversion: true; yourself ].
77
[ aBlock value: stream ]
88
ensure: [ stream close ]

‎repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/writeFileStreamOn.do.binary..st‎

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -1,8 +1,8 @@
1-
as yet unclassified
1+
files
22
writeFileStreamOn: aString do: aBlock binary: aBoolean
33
| stream |
44
stream := aBoolean
5-
ifTrue: [ (MultiByteFileStream fileNamed: aString) ascii; wantsLineEndConversion: true; yourself ]
6-
ifFalse: [ (FileStream fileNamed: aString) binary ].
5+
ifTrue: [ (FileStream fileNamed: aString) binary ]
6+
ifFalse: [ (MultiByteFileStream fileNamed: aString) ascii; wantsLineEndConversion: true; yourself ].
77
[ aBlock value: stream ]
88
ensure: [ stream close ]

0 commit comments

Comments
 (0)