FileApplicationNoteBook.st
branchjv
changeset 15937 b79f5d644b9a
parent 15909 4a1d960d0fd1
parent 15935 db25457b04b4
child 16004 325dd53597fd
--- a/FileApplicationNoteBook.st	Fri Oct 30 07:00:16 2015 +0100
+++ b/FileApplicationNoteBook.st	Fri Nov 13 06:40:27 2015 +0100
@@ -6925,9 +6925,12 @@
 !FileApplicationNoteBook::XMLViewApplication class methodsFor:'queries'!
 
 canOpenItem:anItem
+    |mime|
+    
     (Smalltalk at:#'XML::XMLInspector') isNil ifTrue:[^ false].
-
-    ^ (anItem hasMimeType and:[anItem mimeType isXmlType])
+    ((mime := anItem mimeType) isNil or:[ mime == #unknown]) ifTrue:[^ false].
+    
+    ^ mime isXmlType
 
     "Modified: / 17-02-2011 / 13:34:08 / cg"
 !