ImageReader.st
changeset 6167 baa4c9ec056a
parent 6062 dc9d34b204a3
child 6309 d12f01f0e52e
--- a/ImageReader.st	Wed Nov 27 13:27:29 2013 +0100
+++ b/ImageReader.st	Mon Dec 02 20:04:07 2013 +0100
@@ -1418,13 +1418,12 @@
 
     mime notNil ifTrue:[
         reader := MIMETypes imageReaderForType:mime.
-        reader isNil ifTrue:[
-            "answer the reader when proceeding form this error"
-            reader := ConversionError raiseRequestErrorString:' - unsupported image type: ', mime.
-        ].
-        ^ reader
     ].
-    ^ self
+    reader isNil ifTrue:[
+        "answer the reader when proceeding form this error"
+        reader := ConversionError raiseRequestErrorString:(' - unsupported image type: ''%1''' bindWith:(mime ? aStringOrFilename asFilename suffix)).
+    ].
+    ^ reader
 
     "
      self readerClassForFilename:('http://www.foo.bar/helloworld.png' asURL path)
@@ -2029,10 +2028,10 @@
 !ImageReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/ImageReader.st,v 1.107 2013-05-07 09:27:18 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/ImageReader.st,v 1.108 2013-12-02 19:04:07 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview/ImageReader.st,v 1.107 2013-05-07 09:27:18 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/ImageReader.st,v 1.108 2013-12-02 19:04:07 stefan Exp $'
 ! !