94 'ras' 'image/x-cmu-raster' |
94 'ras' 'image/x-cmu-raster' |
95 'tga' 'image/x-targa' |
95 'tga' 'image/x-targa' |
96 |
96 |
97 "/ misc text ... |
97 "/ misc text ... |
98 |
98 |
99 ('htm' 'html') 'text/html' |
99 ('htm' 'html') 'text/html' |
100 ('txt' 'text') 'text/plain' |
100 ('txt' 'text') 'text/plain' |
101 |
101 |
102 'ps' 'application/postscript' |
102 ('ps' 'eps') 'application/postscript' |
103 'pdf' 'application/pdf' |
103 'pdf' 'application/pdf' |
104 'rtf' 'application/rtf' |
104 'rtf' 'application/rtf' |
105 |
105 |
106 "/ video formats ... |
106 "/ video formats ... |
107 |
107 |
108 'movie' 'video/x-sgi-movie' |
108 'movie' 'video/x-sgi-movie' |
109 'avi' 'video/x-msvideo' |
109 'avi' 'video/x-msvideo' |
110 ('qt' 'mov' 'moov') 'video/quicktime' |
110 ('qt' 'mov' 'moov') 'video/quicktime' |
111 ('mpv2' 'mp2' 'mpeg2') 'video/x-mpeg2' |
111 ('mpv2' 'mp2v' 'mp2' 'mpeg2') 'video/x-mpeg2' |
112 ('mpv' 'mpegv' 'mpg' 'mpeg') 'video/mpeg' |
112 ('mpv' 'mpegv' 'mpg' 'mpeg' 'mpe') 'video/mpeg' |
113 |
113 |
114 "/ audio formats ... |
114 "/ audio formats ... |
115 |
115 |
116 'ra' 'audio/x-pn-realaudio' |
116 ('ra' 'ram') 'audio/x-pn-realaudio' |
117 ('mpa' 'mpega') 'audio/x-mpeg' |
117 ('mpa' 'mpega') 'audio/x-mpeg' |
118 'wav' 'audio/x-wav' |
118 'wav' 'audio/x-wav' |
119 ('aif' 'aiff' 'aifc') 'audio/x-aiff' |
119 ('aif' 'aiff' 'aifc') 'audio/x-aiff' |
120 ('au' 'snd') 'audio/basic' |
120 ('au' 'snd') 'audio/basic' |
121 |
121 |
122 "/ misc stuff |
122 "/ misc stuff |
123 |
123 |
124 'st' 'application/x-smalltalk-source' |
124 "/ progr. languages |
125 'js' 'application/x-javascript' |
125 'st' 'application/x-smalltalk-source' |
126 'java' 'application/x-java-source' |
126 ('js' 'mocha') 'application/x-javascript' |
127 |
127 'java' 'application/x-java-source' |
128 'tar' 'application/x-tar' |
128 'sh' 'application/x-sh' |
129 'tgz' 'application/x-tar-compressed' |
129 'csh' 'application/x-csh' |
130 'zip' 'application/x-zip-compressed' |
130 'tcl' 'application/x-tcl' |
131 'sh' 'application/x-sh' |
131 'pl' 'application/x-perl' |
132 'tcl' 'application/x-tcl' |
132 |
133 'pl' 'application/x-perl' |
133 "/ compressors / archivers |
|
134 'tar' 'application/x-tar' |
|
135 'gtar' 'application/x-gtar' |
|
136 'tgz' 'application/x-tar-compressed' |
|
137 'zip' 'application/x-zip-compressed' |
|
138 'cpio' 'application/x-cpio' |
|
139 'shar' 'application/x-shar' |
|
140 'jar' 'application/java-archive' |
134 |
141 |
135 ) pairWiseDo:[:suff :type| |
142 ) pairWiseDo:[:suff :type| |
136 suff isArray ifTrue:[ |
143 suff isArray ifTrue:[ |
137 suff do:[:s | fileSuffixToTypeMapping at:s put:type] |
144 suff do:[:s | fileSuffixToTypeMapping at:s put:type] |
138 ] ifFalse:[ |
145 ] ifFalse:[ |