class: MIMETypes
authorClaus Gittinger <cg@exept.de>
Sun, 09 Nov 2014 23:17:21 +0100
changeset 3380 e7a59408d31a
parent 3379 6e587b73a3ca
child 3381 5166ef7c73b3
class: MIMETypes changed: #imageTypeList #initializeImageReaderMappings
MIMETypes.st
--- a/MIMETypes.st	Tue Sep 23 13:36:30 2014 +0200
+++ b/MIMETypes.st	Sun Nov 09 23:17:21 2014 +0100
@@ -359,6 +359,7 @@
     TypeToImageReaderClassMapping at:'image/gif'  put:GIFReader.
     TypeToImageReaderClassMapping at:'image/tiff' put:TIFFReader.
     TypeToImageReaderClassMapping at:'image/png'  put:PNGReader.
+    TypeToImageReaderClassMapping at:'image/icns' put:MacOSXIconReader.
 
     "/ setup suffix to image reader class mapping ...
     FileSuffixToImageReaderClassMapping at:'jpg'  put:JPEGReader.
@@ -367,6 +368,7 @@
     FileSuffixToImageReaderClassMapping at:'tif'  put:TIFFReader.
     FileSuffixToImageReaderClassMapping at:'tiff' put:TIFFReader.
     FileSuffixToImageReaderClassMapping at:'png'  put:PNGReader.
+    FileSuffixToImageReaderClassMapping at:'icns'  put:MacOSXIconReader.
 
     "/ some 'used-to-be-optional' readers
     (rdr := Smalltalk at:#WindowsIconReader) notNil ifTrue:[
@@ -677,6 +679,7 @@
         'ras'           'image/x-cmu-raster'
         'tga'           'image/x-targa'
         'ico'           'image/x-ico'
+        'icns'          'image/icns'  
     ) 
 !
 
@@ -1550,11 +1553,11 @@
 !MIMETypes class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/MIMETypes.st,v 1.136 2014-09-16 14:56:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/MIMETypes.st,v 1.137 2014-11-09 22:17:21 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview2/MIMETypes.st,v 1.136 2014-09-16 14:56:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/MIMETypes.st,v 1.137 2014-11-09 22:17:21 cg Exp $'
 ! !