--- a/MIMETypes.st	Fri Jul 20 17:34:32 2012 +0200
+++ b/MIMETypes.st	Fri Jul 20 17:37:50 2012 +0200
@@ -1255,7 +1255,7 @@
     aString class == self ifTrue:[^ aString].
 
     CachedTypes isNil ifTrue:[
-        CachedTypes := CacheDictionary new:100.
+        CachedTypes := Dictionary new:100.
     ].
     cachedType := CachedTypes at:aString ifAbsent:nil.
     cachedType notNil ifTrue:[^ cachedType].
@@ -1268,7 +1268,7 @@
      self fromString:'text/html'
     "
 
-    "Modified: / 20-07-2012 / 17:32:37 / cg"
+    "Modified: / 20-07-2012 / 17:36:31 / cg"
 ! !
 
 !MIMETypes::MIMEType methodsFor:'queries'!
@@ -1338,11 +1338,11 @@
 !MIMETypes class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/MIMETypes.st,v 1.121 2012-07-20 15:34:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/MIMETypes.st,v 1.122 2012-07-20 15:37:50 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview2/MIMETypes.st,v 1.121 2012-07-20 15:34:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/MIMETypes.st,v 1.122 2012-07-20 15:37:50 cg Exp $'
 ! !
 
 MIMETypes initialize!