--- a/AbstractFileBrowser.st	Mon Apr 14 18:50:20 2008 +0200
+++ b/AbstractFileBrowser.st	Sat Apr 19 17:34:46 2008 +0200
@@ -6002,7 +6002,12 @@
         selectedFiles:= self currentSelectedFiles.
         selectedFiles do:[:fileName |
             xmlDocument := XML::XMLParser processDocumentInFilename:fileName beforeScanDo:[:parse| parse validate:false].
-            xmlDocument inspect.
+            XML::XMLInspector notNil ifTrue:[
+                XML::XMLInspector openOn:xmlDocument.
+            ] ifFalse:[
+                "fall back..."
+                xmlDocument inspect.
+            ]
         ].
     ]
 !
@@ -7377,5 +7382,5 @@
 !AbstractFileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.365 2008-04-02 15:45:08 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.366 2008-04-19 15:34:46 stefan Exp $'
 ! !