equal
deleted
inserted
replaced
1416 mime := aStringOrFilename asFilename mimeTypeOfContents. |
1416 mime := aStringOrFilename asFilename mimeTypeOfContents. |
1417 ]. |
1417 ]. |
1418 |
1418 |
1419 mime notNil ifTrue:[ |
1419 mime notNil ifTrue:[ |
1420 reader := MIMETypes imageReaderForType:mime. |
1420 reader := MIMETypes imageReaderForType:mime. |
1421 reader isNil ifTrue:[ |
1421 ]. |
1422 "answer the reader when proceeding form this error" |
1422 reader isNil ifTrue:[ |
1423 reader := ConversionError raiseRequestErrorString:' - unsupported image type: ', mime. |
1423 "answer the reader when proceeding form this error" |
1424 ]. |
1424 reader := ConversionError raiseRequestErrorString:(' - unsupported image type: ''%1''' bindWith:(mime ? aStringOrFilename asFilename suffix)). |
1425 ^ reader |
1425 ]. |
1426 ]. |
1426 ^ reader |
1427 ^ self |
|
1428 |
1427 |
1429 " |
1428 " |
1430 self readerClassForFilename:('http://www.foo.bar/helloworld.png' asURL path) |
1429 self readerClassForFilename:('http://www.foo.bar/helloworld.png' asURL path) |
1431 self readerClassForFilename:('http://www.foo.bar/helloworld.gif' asURL path) |
1430 self readerClassForFilename:('http://www.foo.bar/helloworld.gif' asURL path) |
1432 " |
1431 " |
2027 ! ! |
2026 ! ! |
2028 |
2027 |
2029 !ImageReader class methodsFor:'documentation'! |
2028 !ImageReader class methodsFor:'documentation'! |
2030 |
2029 |
2031 version |
2030 version |
2032 ^ '$Header: /cvs/stx/stx/libview/ImageReader.st,v 1.107 2013-05-07 09:27:18 cg Exp $' |
2031 ^ '$Header: /cvs/stx/stx/libview/ImageReader.st,v 1.108 2013-12-02 19:04:07 stefan Exp $' |
2033 ! |
2032 ! |
2034 |
2033 |
2035 version_CVS |
2034 version_CVS |
2036 ^ '$Header: /cvs/stx/stx/libview/ImageReader.st,v 1.107 2013-05-07 09:27:18 cg Exp $' |
2035 ^ '$Header: /cvs/stx/stx/libview/ImageReader.st,v 1.108 2013-12-02 19:04:07 stefan Exp $' |
2037 ! ! |
2036 ! ! |
2038 |
2037 |