--- a/GIFReader.st	Fri Apr 11 00:53:07 1997 +0200
+++ b/GIFReader.st	Fri Apr 11 00:55:22 1997 +0200
@@ -385,17 +385,6 @@
         ^ self
     ].
 
-    type == 16rFE ifTrue:[
-        "/
-        "/ comment extension
-        "/
-        'GIFREADER [info]: comment extension ignored' infoPrintCR.
-        [(blockSize := aStream nextByte) ~~ 0] whileTrue:[
-            aStream skip:blockSize
-        ].
-        ^ self
-    ].
-
     type == 16r01 ifTrue:[
         "/
         "/ plaintext extension
@@ -442,6 +431,17 @@
         ^ self
     ].
 
+    type == 16rFE ifTrue:[
+        "/
+        "/ comment extension
+        "/
+        'GIFREADER [info]: comment extension ignored' infoPrintCR.
+        [(blockSize := aStream nextByte) ~~ 0] whileTrue:[
+            aStream skip:blockSize
+        ].
+        ^ self
+    ].
+
     type == 16rFF ifTrue:[
         "/
         "/  application extension
@@ -461,12 +461,12 @@
         aStream skip:subBlockSize
     ]
 
-    "Modified: 10.1.1997 / 14:55:45 / cg"
+    "Modified: 11.4.1997 / 00:55:15 / cg"
 ! !
 
 !GIFReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/GIFReader.st,v 1.46 1997-02-01 14:06:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/GIFReader.st,v 1.47 1997-04-10 22:55:22 cg Exp $'
 ! !
 GIFReader initialize!