diff -r a95276d36ce8 -r f2c56662a45e GIFReader.st
--- a/GIFReader.st	Fri Feb 17 11:57:52 2017 +0100
+++ b/GIFReader.st	Fri Feb 17 13:02:33 2017 +0100
@@ -281,7 +281,7 @@
             atEnd := true
         ] ifFalse:[
             byte == Extension ifTrue:[
-"/ 'Ext' infoPrintCR.
+                "/ 'Ext' infoPrintCR.
                 self readExtension:aStream.
             ] ifFalse:[
                 (byte == Terminator) ifTrue:[
@@ -291,7 +291,7 @@
                     (byte ~~ ImageSeparator) ifTrue:[
                         ^ self fileFormatError:('corrupted gif file (no IMAGESEP): ' , (byte printStringRadix:16)).
                     ].
-"/ 'Img' infoPrintCR.
+                    "/ 'Img' infoPrintCR.
 
                     fileColorMap notNil ifTrue:[
                         colorMap := fileColorMap.
@@ -365,8 +365,9 @@
      Image fromFile:'/home/cg/work/stx/goodies/bitmaps/gifImages/animated/arrow.gif'
     "
 
-    "Modified: / 5.7.1996 / 17:32:01 / stefan"
-    "Modified: / 21.8.1998 / 22:20:00 / cg"
+    "Modified: / 05-07-1996 / 17:32:01 / stefan"
+    "Modified: / 21-08-1998 / 22:20:00 / cg"
+    "Modified (format): / 17-02-2017 / 12:29:10 / cg"
 ! !
 
 !GIFReader methodsFor:'private-reading'!
@@ -548,17 +549,17 @@
     "get image data"
     leftOffs := aStream nextInt16MSB:false.
     topOffs := aStream nextInt16MSB:false.
-"/    'GIFReader: leftOffs ' infoPrint. leftOffs infoPrintCR.
-"/    'GIFReader: topOffs ' infoPrint. topOffs infoPrintCR.
+    "/    'GIFReader: leftOffs ' infoPrint. leftOffs infoPrintCR.
+    "/    'GIFReader: topOffs ' infoPrint. topOffs infoPrintCR.
     width := aStream nextInt16MSB:false.
     height := aStream nextInt16MSB:false.
 
     self reportDimension.
 
-"/
-"/    'width ' print. width printNewline.
-"/    'height ' print. height printNewline.
-"/
+    "/
+    "/    'width ' print. width printNewline.
+    "/    'height ' print. height printNewline.
+    "/
 
     "another flag byte"
     flag := aStream nextByte.
@@ -606,7 +607,7 @@
 
     h := height.
     data := ByteArray new:((width + 1) * (h + 1)).
-"/    'GIFReader: decompressing ...' infoPrintCR.
+    "/    'GIFReader: decompressing ...' infoPrintCR.
 
     self class decompressGIFFrom:compressedData
                            count:compressedSize
@@ -615,7 +616,7 @@
                          codeLen:(codeLen + 1).
 
     interlaced ifTrue:[
-"/    'GIFREADER: deinterlacing ...' infoPrintCR.
+    "/    'GIFREADER: deinterlacing ...' infoPrintCR.
         tmp := ByteArray new:(data size).
 
         "phase 1: 0, 8, 16, 24, ..."
@@ -661,7 +662,7 @@
 
     "Created: / 13-01-1998 / 10:44:05 / cg"
     "Modified: / 12-08-1998 / 13:55:32 / cg"
-    "Modified (format): / 16-11-2016 / 23:07:20 / cg"
+    "Modified (format): / 17-02-2017 / 12:29:44 / cg"
 ! !
 
 !GIFReader methodsFor:'private-writing'!