#REFACTORING by cg
class: ImageReader
changed: #writingFile:for:do: (send #remove instead of #delete)
--- a/ImageReader.st Tue Mar 27 15:42:13 2018 +0200
+++ b/ImageReader.st Tue Mar 27 20:12:11 2018 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
"
COPYRIGHT (c) 1991 by Claus Gittinger
All Rights Reserved
@@ -2833,23 +2831,23 @@
|stream|
[
- stream := aFileName asFilename newReadWriteStream.
+ stream := aFileName asFilename newReadWriteStream.
] on:FileStream openErrorSignal do:[:ex|
- ^ Image fileCreationErrorSignal
- raiseWith:something
- errorString:('file creation error: ' , ex description).
+ ^ Image fileCreationErrorSignal
+ raiseWith:something
+ errorString:('file creation error: ' , ex description).
].
[
- [
- aBlock value: stream
- ] ensure:[
- stream close.
- ].
+ [
+ aBlock value: stream
+ ] ensure:[
+ stream close.
+ ].
] ifCurtailed:[
- OsError catch:[
- aFileName asFilename delete.
- ]
+ OsError catch:[
+ aFileName asFilename remove.
+ ]
].
"Modified: / 04-08-2017 / 11:28:41 / stefan"