*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Fri, 31 Jul 2009 10:49:05 +0200
changeset 2694 54871b04e18f
parent 2693 63c153f0ce90
child 2695 6197b6af7f4f
*** empty log message ***
GIFReader.st
--- a/GIFReader.st	Thu Jul 09 20:07:51 2009 +0200
+++ b/GIFReader.st	Fri Jul 31 10:49:05 2009 +0200
@@ -122,7 +122,7 @@
     "Modified: 10.1.1997 / 15:40:34 / cg"
 ! !
 
-!GIFReader methodsFor:'AEG-Changes'!
+!GIFReader methodsFor:'image reading'!
 
 fromStream:aStream
     "read a stream containing a GIF image (or an image sequence).
@@ -287,6 +287,21 @@
 
     "Modified: / 5.7.1996 / 17:32:01 / stefan"
     "Modified: / 21.8.1998 / 22:20:00 / cg"
+! !
+
+!GIFReader methodsFor:'private-reading'!
+
+makeGreyscale
+    "not yet implemented/needed"
+!
+
+readColorMap:colorMapSize
+    "get a gif colormap consisting of colorMapSize entries"
+
+    |rgbVector|
+
+    rgbVector := inStream nextBytes:colorMapSize*3.
+    ^ MappedPalette rgbBytesVector:rgbVector 
 !
 
 readExtension:aStream
@@ -439,21 +454,6 @@
     ]
 
     "Modified: / 1.4.1998 / 15:01:18 / cg"
-! !
-
-!GIFReader methodsFor:'private-reading'!
-
-makeGreyscale
-    "not yet implemented/needed"
-!
-
-readColorMap:colorMapSize
-    "get a gif colormap consisting of colorMapSize entries"
-
-    |rgbVector|
-
-    rgbVector := inStream nextBytes:colorMapSize*3.
-    ^ MappedPalette rgbBytesVector:rgbVector 
 !
 
 readImage:aStream
@@ -986,7 +986,7 @@
 !GIFReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/GIFReader.st,v 1.95 2009-02-11 16:19:55 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/GIFReader.st,v 1.96 2009-07-31 08:49:05 cg Exp $'
 ! !
 
 GIFReader initialize!