TIFFReader.st
changeset 1814 2f204c2a957d
parent 1805 93f557cbe600
child 1826 0a452034f661
--- a/TIFFReader.st	Fri Sep 12 13:40:49 2003 +0200
+++ b/TIFFReader.st	Fri Sep 12 13:43:19 2003 +0200
@@ -2111,23 +2111,6 @@
 
 !TIFFReader methodsFor:'writing'!
 
-save:image onFile:aFileName
-    "save image as (uncompressed) TIFF file on aFileName"
-
-    [
-        outStream := aFileName asFilename newReadWriteStream.
-    ] on:FileStream openErrorSignal do:[:ex|
-        ^ Image fileCreationErrorSignal 
-            raiseWith:image
-            errorString:('file creation error: ' , aFileName asString).
-    ].
-    [
-        self save:image onStream:outStream.
-    ] ensure:[
-        outStream close.
-    ].
-!
-
 save:image onStream:aStream
     "save image as (uncompressed) TIFF file on aFileName"
 
@@ -2221,7 +2204,7 @@
 !TIFFReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/TIFFReader.st,v 1.75 2003-09-01 14:47:53 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/TIFFReader.st,v 1.76 2003-09-12 11:43:19 cg Exp $'
 ! !
 
 TIFFReader initialize!