--- a/GIFReader.st Mon Apr 28 11:18:06 2003 +0200
+++ b/GIFReader.st Mon Apr 28 12:16:30 2003 +0200
@@ -464,27 +464,7 @@
|rgbVector|
rgbVector := inStream nextBytes:colorMapSize*3.
- ^ Colormap rgbVector:rgbVector
-
-"/ |sz "{ Class: SmallInteger }"
-"/ redMap greenMap blueMap|
-"/
-"/ redMap := ByteArray uninitializedNew:colorMapSize.
-"/ greenMap := ByteArray uninitializedNew:colorMapSize.
-"/ blueMap := ByteArray uninitializedNew:colorMapSize.
-"/
-"/ sz := colorMapSize.
-"/ 1 to:sz do:[:i |
-"/ redMap at:i put:(inStream nextByte).
-"/ greenMap at:i put:(inStream nextByte).
-"/ blueMap at:i put:(inStream nextByte)
-"/ ].
-"/
-"/ ^ Colormap
-"/ redVector:redMap
-"/ greenVector:greenMap
-"/ blueVector:blueMap.
- "Modified: 21.6.1996 / 12:32:43 / cg"
+ ^ Colormap rgbBytesVector:rgbVector
!
readExtension:aStream
@@ -1003,7 +983,7 @@
!GIFReader class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview2/GIFReader.st,v 1.82 2003-04-28 09:18:06 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/GIFReader.st,v 1.83 2003-04-28 10:16:22 cg Exp $'
! !
GIFReader initialize!