--- a/MIMETypes.st	Thu Feb 09 18:24:14 2017 +0100
+++ b/MIMETypes.st	Thu Feb 09 23:46:29 2017 +0100
@@ -957,6 +957,10 @@
         ]
     ].
 
+    type == #unknown ifTrue:[
+        type := nil.
+    ].
+
     ^ type
 
     "
@@ -966,10 +970,12 @@
      MIMETypes mimeTypeForFilename:'foo.tar.gz'
      MIMETypes mimeTypeForFilename:'foo.txt'   
      MIMETypes mimeTypeForFilename:'foo.pkg'   
+     MIMETypes mimeTypeForFilename:'foo.sm'   
     "
 
     "Modified: / 10-05-2011 / 11:55:18 / cg"
     "Modified (format): / 28-07-2012 / 09:39:15 / cg"
+    "Modified: / 09-02-2017 / 23:45:45 / stefan"
 !
 
 mimeTypeForFilename:filename put:mimeType