--- a/Image.st	Mon Jul 21 11:30:29 1997 +0200
+++ b/Image.st	Mon Jul 21 17:14:47 1997 +0200
@@ -631,9 +631,12 @@
      The mapping here is a default needed for proper operation of ST/X;
      see the 'smalltalk.rc'/'display.rc' startup files for a real (full) map."
 
-    MIMETypes imageReaderForSuffix:'xbm'  put:XBMReader.
-    MIMETypes imageReaderForSuffix:'tiff' put:TIFFReader.
-    MIMETypes imageReaderForSuffix:'gif'  put:GIFReader.
+    MIMETypes notNil ifTrue:[
+        MIMETypes autoload.
+        MIMETypes imageReaderForSuffix:'xbm'  put:XBMReader.
+        MIMETypes imageReaderForSuffix:'tiff' put:TIFFReader.
+        MIMETypes imageReaderForSuffix:'gif'  put:GIFReader.
+    ].
 
     "
      Image initializeFileFormatTable
@@ -648,6 +651,7 @@
      see the 'smalltalk.rc'/'display.rc' startup files for a real (full) map."
 
     MIMETypes notNil ifTrue:[
+        MIMETypes autoload.
         MIMETypes imageReaderForSuffix:'image/gif'       put:GIFReader.
         MIMETypes imageReaderForSuffix:'image/tiff'      put:TIFFReader.
         MIMETypes imageReaderForSuffix:'image/x-xbitmap' put:XBMReader.
@@ -10971,6 +10975,6 @@
 !Image class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Image.st,v 1.216 1997-06-30 22:19:16 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Image.st,v 1.217 1997-07-21 15:14:47 cg Exp $'
 ! !
 Image initialize!