--- a/GIFReader.st Sun Nov 02 18:09:15 1997 +0100
+++ b/GIFReader.st Sun Nov 02 18:32:36 1997 +0100
@@ -853,7 +853,7 @@
bitsPerPixel := image bitsPerPixel.
- outStream nextPutAll: 'GIF87a' asByteArray.
+ outStream nextPutAll: 'GIF89a' asByteArray.
self writeShort:width. "/ screen size
self writeShort:height.
t1 := 128.
@@ -900,9 +900,8 @@
"/ outStream nextPut:0; nextPut:0; nextPut:0
"/ ].
-
- "Created: 14.10.1997 / 17:41:28 / cg"
- "Modified: 21.10.1997 / 04:52:18 / cg"
+ "Created: / 14.10.1997 / 17:41:28 / cg"
+ "Modified: / 31.10.1997 / 16:12:13 / cg"
!
writeMaskExtensionHeaderFor:image
@@ -922,6 +921,6 @@
!GIFReader class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview2/GIFReader.st,v 1.62 1997-10-28 18:38:32 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/GIFReader.st,v 1.63 1997-11-02 17:32:36 cg Exp $'
! !
GIFReader initialize!