FileApplicationNoteBook.st
changeset 18266 0e62cddf5604
parent 18236 1a5d0cc081b7
child 18271 f30308d770d0
--- a/FileApplicationNoteBook.st	Thu Jul 12 21:45:02 2018 +0200
+++ b/FileApplicationNoteBook.st	Fri Jul 13 16:59:25 2018 +0200
@@ -7218,11 +7218,15 @@
     |mime|
     
     (Smalltalk at:#'XML::XMLInspector') isNil ifTrue:[^ false].
-    ((mime := anItem mimeType) isNil or:[ mime == #unknown]) ifTrue:[^ false].
+    ((mime := anItem mimeType) isNil or:[ mime == #unknown]) ifTrue:[
+        mime := anItem fileName mimeTypeOfContents
+    ].    
+    (mime isNil or:[ mime == #unknown]) ifTrue:[^ false].
     
     ^ mime isXmlType
 
     "Modified: / 17-02-2011 / 13:34:08 / cg"
+    "Modified: / 13-07-2018 / 16:59:03 / Claus Gittinger"
 !
 
 wantNewApplicationAnyway