--- a/GIFReader.st	Fri Jan 31 18:59:54 1997 +0100
+++ b/GIFReader.st	Sat Feb 01 15:07:04 1997 +0100
@@ -69,12 +69,11 @@
 
 initialize
     "install myself in the Image classes fileFormat table
-     for the `.gif', and '.GIF' extensions."
+     for the `.gif' extensions."
 
-    Image fileFormats at:'.gif'  put:self.
-    Image fileFormats at:'.GIF'  put:self.
+    Image addReader:self suffix:'gif'.
 
-    "Modified: 23.4.1996 / 12:28:16 / cg"
+    "Modified: 1.2.1997 / 14:59:37 / cg"
 ! !
 
 !GIFReader class methodsFor:'testing'!
@@ -468,6 +467,6 @@
 !GIFReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/GIFReader.st,v 1.45 1997-01-10 14:48:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/GIFReader.st,v 1.46 1997-02-01 14:06:08 cg Exp $'
 ! !
 GIFReader initialize!