# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 891450856 -7200
# Node ID f725cdcd43f47b33e2535a1d1d93bd6130ca18d3
# Parent  85b7aa0e79e4a8c29504ec6a0b6bbc420cff6b9e
care for iterationCount

diff -r 85b7aa0e79e4 -r f725cdcd43f4 GIFReader.st
--- a/GIFReader.st	Wed Apr 01 17:21:53 1998 +0200
+++ b/GIFReader.st	Wed Apr 01 19:14:16 1998 +0200
@@ -437,13 +437,24 @@
         ].
     ].
 
+    imageSequence notNil ifTrue:[
+        iterationCount notNil ifTrue:[
+            iterationCount == 0 ifTrue:[
+                imageSequence loop:true.
+            ] ifFalse:[
+                imageSequence loop:false.
+                imageSequence iterationCount:iterationCount.
+            ]
+        ]
+    ].
+
     "
      Image fromFile:'/home/cg/work/stx/goodies/bitmaps/gifImages/animated/vrml.gif'
      Image fromFile:'/home/cg/work/stx/goodies/bitmaps/gifImages/animated/arrow.gif'
     "
 
     "Modified: / 5.7.1996 / 17:32:01 / stefan"
-    "Modified: / 1.4.1998 / 15:00:07 / cg"
+    "Modified: / 1.4.1998 / 19:03:46 / cg"
 !
 
 makeGreyscale
@@ -970,6 +981,6 @@
 !GIFReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/GIFReader.st,v 1.69 1998-04-01 13:02:02 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/GIFReader.st,v 1.70 1998-04-01 17:14:16 cg Exp $'
 ! !
 GIFReader initialize!