--- a/FileDialogWithPreview.st	Sat Dec 07 11:44:23 2013 +0100
+++ b/FileDialogWithPreview.st	Sat Dec 07 11:46:29 2013 +0100
@@ -309,7 +309,7 @@
     super fileSelectionChanged.
     ((fn := self filenameHolder value) notNil and:[ fn exists ]) ifTrue:[
         (mime := fn mimeTypeFromName) notNil ifTrue:[
-            mime isImage ifTrue:[
+            mime isImageType ifTrue:[
                 image := Image fromFile:fn.
                 imagePreview image:image.
             ].
@@ -330,10 +330,10 @@
 !FileDialogWithPreview class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileDialogWithPreview.st,v 1.5 2013-06-07 13:23:56 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileDialogWithPreview.st,v 1.6 2013-12-07 10:46:29 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/FileDialogWithPreview.st,v 1.5 2013-06-07 13:23:56 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileDialogWithPreview.st,v 1.6 2013-12-07 10:46:29 cg Exp $'
 ! !