Mercurial Mercurial > hg > stx-libview2 / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
checkin from browser
authorClaus Gittinger <cg@exept.de>
Tue, 01 Jul 1997 00:06:33 +0200
changeset 650 dc0c39508ff3
parent 649 ae3c596094dd
child 651 3cce932a72b1
checkin from browser
MIMETypes.st file | annotate | diff | comparison | revisions 
--- a/MIMETypes.st	Mon Jun 30 23:28:12 1997 +0200
+++ b/MIMETypes.st	Tue Jul 01 00:06:33 1997 +0200
@@ -63,34 +63,36 @@
     FileSuffixToTypeMapping at:'gif' put:'image/gif'.
     FileSuffixToTypeMapping at:'tif' put:'image/tiff'.
 
+    FileSuffixToTypeMapping at:'htm'  put:'text/html'.
+    FileSuffixToTypeMapping at:'html' put:'text/html'.
+    FileSuffixToTypeMapping at:'ps'   put:'application/postscript'.
+
     FileSuffixToImageReaderClassMapping isNil ifTrue:[FileSuffixToImageReaderClassMapping := Dictionary new].
     FileSuffixToImageReaderClassMapping at:'jpg'  put:JPEGReader.
     FileSuffixToImageReaderClassMapping at:'gif'  put:GIFReader.
     FileSuffixToImageReaderClassMapping at:'tif'  put:TIFFReader.
 
     CharSetToFontMapping isNil ifTrue:[CharSetToFontMapping := Dictionary new].
-    CharSetToFontMapping at:'iso2022-jp' put:'jis'.
-    CharSetToFontMapping at:'euc-jp'     put:'jis'.
-    CharSetToFontMapping at:'shift-jis'  put:'jis'.
-    CharSetToFontMapping at:'sjis'       put:'jis'.
-    CharSetToFontMapping at:'jis7'       put:'jis'.
-    CharSetToFontMapping at:'jis8'       put:'jis'.
+    CharSetToFontMapping at:'iso2022-jp'  put:'jis*0208*'.
+    CharSetToFontMapping at:'x-euc-jp'    put:'jis*0208*'.
+    CharSetToFontMapping at:'x-shift-jis' put:'jis*0208*'.
+    CharSetToFontMapping at:'x-sjis'      put:'jis*0208*'.
+    CharSetToFontMapping at:'x-jis7'      put:'jis*0208*'.
 
-    CharSetToFontMapping at:'iso2022-cn' put:'big5'.
-    CharSetToFontMapping at:'euc-cn'     put:'big5'.
-    CharSetToFontMapping at:'hz'         put:'big5'.
+    CharSetToFontMapping at:'big5'        put:'big5*'.
 
-    CharSetToFontMapping at:'gb2312'     put:'gb'.
-    CharSetToFontMapping at:'euc-gb'     put:'gb'.
+    CharSetToFontMapping at:'gb2312'      put:'gb*'.
+    CharSetToFontMapping at:'hz-gb-2312'  put:'gb*'.
+    CharSetToFontMapping at:'x-gbk'       put:'gb*'.
 
-    CharSetToFontMapping at:'iso2022-kr' put:'ksc'.
-    CharSetToFontMapping at:'euc-kr'     put:'ksc'.
+    CharSetToFontMapping at:'iso2022-kr'  put:'ksc*'.
+    CharSetToFontMapping at:'x-euc-kr'    put:'ksc*'.
 
     "
      self initialize
     "
 
-    "Modified: 30.6.1997 / 23:28:04 / cg"
+    "Modified: 1.7.1997 / 00:03:32 / cg"
 ! !
 
 !MIMETypes class methodsFor:'accessing'!
@@ -212,6 +214,6 @@
 !MIMETypes class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/MIMETypes.st,v 1.6 1997-06-30 21:28:12 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/MIMETypes.st,v 1.7 1997-06-30 22:06:33 cg Exp $'
 ! !
 MIMETypes initialize!
hg/stx-libview2