--- a/MIMETypes.st	Wed Sep 11 17:04:14 2002 +0200
+++ b/MIMETypes.st	Wed Sep 11 17:42:31 2002 +0200
@@ -192,6 +192,7 @@
     |typeToImageReaderClassMapping fileSuffixToTypeMapping
      fileSuffixToImageReaderClassMapping charSetToFontMapping types|
 
+    MIMEType initialize.   "must be initialized first"
     LastSuffix := LastType := nil.
 
     (fileSuffixToImageReaderClassMapping := FileSuffixToImageReaderClassMapping) isNil ifTrue:[
@@ -655,6 +656,6 @@
 !MIMETypes class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/MIMETypes.st,v 1.39 2002-09-11 15:04:14 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/MIMETypes.st,v 1.40 2002-09-11 15:42:31 stefan Exp $'
 ! !
 MIMETypes initialize!