ImageReader.st
changeset 7924 ff2f12b98716
parent 7908 84a8ad360ada
child 7925 2c80806ec2de
--- a/ImageReader.st	Tue Feb 21 17:23:59 2017 +0100
+++ b/ImageReader.st	Wed Feb 22 01:02:39 2017 +0100
@@ -1734,6 +1734,26 @@
     "
 
     "Modified (comment): / 05-02-2017 / 16:58:11 / cg"
+!
+
+saveAll:aCollectionOfImages onFile:aFilename
+    "save an image collection in my format on a file.
+     Not all file formats support multiple images, 
+     so be prepared for an exception to be raised."
+
+    ^ (self basicNew) saveAll:aCollectionOfImages onFile:aFilename
+
+    "Created: / 22-02-2017 / 01:01:17 / cg"
+!
+
+saveAll:aCollectionOfImages onStream:aStream
+    "save an image collection in my format on a Stream.
+     Not all file formats support multiple images, 
+     so be prepared for an exception to be raised."
+
+    ^ (self basicNew) saveAll:aCollectionOfImages onStream:aStream
+
+    "Created: / 22-02-2017 / 01:00:44 / cg"
 ! !
 
 !ImageReader class methodsFor:'queries'!
@@ -2132,24 +2152,27 @@
 
 saveAll:aCollectionOfImages onFile:aFileName
     "save a collection of images in my format on aFile.
-     Not all file formats support multiple images, so be prepared
-     for an exception to be raised."
+     Not all file formats support multiple images, 
+     so be prepared for an exception to be raised."
 
     self writingFile:aFileName for:aCollectionOfImages do:[:stream |
-	self saveAll:aCollectionOfImages onStream:stream.
+        self saveAll:aCollectionOfImages onStream:stream.
     ].
 
     "Modified: / 01-06-2010 / 19:02:17 / cg"
+    "Modified (comment): / 22-02-2017 / 01:00:03 / cg"
 !
 
 saveAll:aCollectionOfImages onStream:aStream
     "save an image collection in my format on a Stream.
-     Not all file formats support multiple images, so be prepared
-     for an exception to be raised."
+     Not all file formats support multiple images, 
+     so be prepared for an exception to be raised."
 
     ^ Image cannotRepresentImageSignal
-	raiseWith:aCollectionOfImages
-	errorString:('save of imageSequence not implemented/supported for this format').
+        raiseWith:aCollectionOfImages
+        errorString:('save of imageSequence not implemented/supported for this format').
+
+    "Modified (comment): / 22-02-2017 / 01:00:11 / cg"
 !
 
 writingFile:aFileName for:something do:aBlock