--- a/MIMETypes.st	Sun Aug 27 14:31:50 2017 +0200
+++ b/MIMETypes.st	Sun Aug 27 16:35:52 2017 +0200
@@ -973,7 +973,7 @@
             suff2 notEmpty ifTrue:[
                 type := self mimeTypeForSuffix:(suff2 , '.' , suff).
             ].
-            type isNil ifTrue:[
+            (type isNil or:[type == #unknown]) ifTrue:[
                 type := self mimeTypeForSuffix:suff
             ].
         ]
@@ -993,11 +993,14 @@
      MIMETypes mimeTypeForFilename:'foo.txt'   
      MIMETypes mimeTypeForFilename:'foo.pkg'   
      MIMETypes mimeTypeForFilename:'foo.sm'   
+     MIMETypes mimeTypeForFilename:'/Users/cg/work/stx/goodies/bitmaps/tiffimages/moreSamples/multi-channel.ome.tif'
+     MIMETypes mimeTypeForFilename:'multi-channel.ome.tif'
+     MIMETypes mimeTypeForFilename:'multi-channel.tif'
+'   
     "
 
-    "Modified: / 10-05-2011 / 11:55:18 / cg"
-    "Modified (format): / 28-07-2012 / 09:39:15 / cg"
     "Modified (format): / 27-06-2017 / 16:25:40 / stefan"
+    "Modified: / 27-08-2017 / 16:35:37 / cg"
 !
 
 mimeTypeForFilename:filename put:mimeType