--- a/GIFReader.st	Mon Jun 30 22:35:35 1997 +0200
+++ b/GIFReader.st	Mon Jun 30 22:56:45 1997 +0200
@@ -71,7 +71,7 @@
     "install myself in the Image classes fileFormat table
      for the `.gif' extensions."
 
-    Image addReader:self suffix:'gif' mimeType:'image/gif'.
+    MIMETypes defineImageType:'image/gif' suffix:'gif' reader:self.
 
     "Modified: 1.2.1997 / 14:59:37 / cg"
 ! !
@@ -517,6 +517,6 @@
 !GIFReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/GIFReader.st,v 1.53 1997-06-24 20:46:52 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/GIFReader.st,v 1.54 1997-06-30 20:55:52 cg Exp $'
 ! !
 GIFReader initialize!