X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=blobdiff_plain;f=lisp%2Fmule%2Fmule-coding.el;h=63ed9fdaa43895582cb525ef1a98ca54c8f56c9a;hp=fe8535ff18ce720068b77cbf2a787c0d4edb7aef;hb=9fb99efe1a4c5dfb71d922ca19de3d437460b1d2;hpb=5d1c8a2b5229a0725bfc6d4eb877e6befdf3e38a diff --git a/lisp/mule/mule-coding.el b/lisp/mule/mule-coding.el index fe8535f..63ed9fd 100644 --- a/lisp/mule/mule-coding.el +++ b/lisp/mule/mule-coding.el @@ -187,33 +187,65 @@ =decomposition@hanyo-denshi)) (setq coded-charset-entity-reference-alist - '(((=adobe-japan1-base . isolated) "I-AJ1-" 5 d) - ((=adobe-japan1-6 . isolated) "I-AJ1-" 5 d) + '(((=adobe-japan1-6 . isolated) "I-AJ1-" 5 d) + ( =adobe-japan1-6 "AJ1-" 5 d) + ((=adobe-japan1-base . isolated) "I-AJ1-" 5 d) + ( =adobe-japan1-base "I-AJ1-" 5 d) ((=gt . isolated) "I-GT-" 5 d) + ( =gt "GT-" 5 d) + ( =zinbun-oracle "ZOB-" 4 d) ((=ruimoku-v6 . isolated) "I-RUI6-" 4 X) - ((chinese-big5-cdp . isolated) "I-CDP-" 4 X) + ( =ruimoku-v6 "RUI6-" 4 X) + ((=big5-cdp . isolated) "I-CDP-" 4 X) + ( =big5-cdp "CDP-" 4 X) + ((=daikanwa@rev2 . isolated) "I-M-" 5 d) + ( =daikanwa "M-" 5 d) + ( =daikanwa@rev2 "r2M-" 5 d) + ( =daikanwa@rev1 "r1M-" 5 d) ((=gt-k . isolated) "I-GT-K" 5 d) - ((ideograph-cbeta . isolated) "I-CB" 5 d) - ((ideograph-hanziku-1 . isolated) "I-HZK01-" 4 X) - ((ideograph-hanziku-2 . isolated) "I-HZK02-" 4 X) - ((ideograph-hanziku-3 . isolated) "I-HZK03-" 4 X) - ((ideograph-hanziku-4 . isolated) "I-HZK04-" 4 X) - ((ideograph-hanziku-5 . isolated) "I-HZK05-" 4 X) - ((ideograph-hanziku-6 . isolated) "I-HZK06-" 4 X) - ((ideograph-hanziku-7 . isolated) "I-HZK07-" 4 X) - ((ideograph-hanziku-8 . isolated) "I-HZK08-" 4 X) - ((ideograph-hanziku-9 . isolated) "I-HZK09-" 4 X) - ((ideograph-hanziku-10 . isolated) "I-HZK10-" 4 X) - ((ideograph-hanziku-11 . isolated) "I-HZK11-" 4 X) - ((ideograph-hanziku-12 . isolated) "I-HZK12-" 4 X) + ( =gt-k "GT-K" 5 d) + ((=cbeta . isolated) "I-CB" 5 d) + ( =cbeta "CB" 5 d) + ((=hanziku-1 . isolated) "I-HZK01-" 4 X) + ( =hanziku-1 "HZK01-" 4 X) + ((=hanziku-2 . isolated) "I-HZK02-" 4 X) + ( =hanziku-2 "HZK02-" 4 X) + ((=hanziku-3 . isolated) "I-HZK03-" 4 X) + ( =hanziku-3 "HZK03-" 4 X) + ((=hanziku-4 . isolated) "I-HZK04-" 4 X) + ( =hanziku-4 "HZK04-" 4 X) + ((=hanziku-5 . isolated) "I-HZK05-" 4 X) + ( =hanziku-5 "HZK05-" 4 X) + ((=hanziku-6 . isolated) "I-HZK06-" 4 X) + ( =hanziku-6 "HZK06-" 4 X) + ((=hanziku-7 . isolated) "I-HZK07-" 4 X) + ( =hanziku-7 "HZK07-" 4 X) + ((=hanziku-8 . isolated) "I-HZK08-" 4 X) + ( =hanziku-8 "HZK08-" 4 X) + ((=hanziku-9 . isolated) "I-HZK09-" 4 X) + ( =hanziku-9 "HZK09-" 4 X) + ((=hanziku-10 . isolated) "I-HZK10-" 4 X) + ( =hanziku-10 "HZK10-" 4 X) + ((=hanziku-11 . isolated) "I-HZK11-" 4 X) + ( =hanziku-11 "HZK11-" 4 X) + ((=hanziku-12 . isolated) "I-HZK12-" 4 X) + ( =hanziku-12 "HZK12-" 4 X) ((=jis-x0208@1990 . isolated) "I-J90-" 4 X) ((=jis-x0208@1983 . isolated) "I-J83-" 4 X) ((=jis-x0213-1@2000 . isolated) "I-JX1-" 4 X) ((=jis-x0213-2 . isolated) "I-JX2-" 4 X) ((=jis-x0213-1@2004 . isolated) "I-JX3-" 4 X) ((=jis-x0212 . isolated) "I-JSP-" 4 X) - ((=jis-x0208@1978 . isolated) "I-J78-" 4 X) + ((=jis-x0208@1978/1pr . isolated) "I-J78-" 4 X) + ( =jis-x0208@1990 "J90-" 4 X) + ((=jis-x0208 . isolated) "I-J90-" 4 X) + ( =jis-x0213-1@2000 "JX1-" 4 X) + ( =jis-x0213-2 "JX2-" 4 X) + ( =jis-x0213-1@2004 "JX3-" 4 X) + ( =jis-x0212 "JSP-" 4 X) + ( =jis-x0208@1983 "J83-" 4 X) ((chinese-gb2312 . isolated) "I-G0-" 4 X) + ((=iso-ir165 . isolated) "I-EGB-" 4 X) ((chinese-cns11643-1 . isolated) "I-C1-" 4 X) ((chinese-cns11643-2 . isolated) "I-C2-" 4 X) ((chinese-cns11643-3 . isolated) "I-C3-" 4 X) @@ -222,9 +254,7 @@ ((chinese-cns11643-6 . isolated) "I-C6-" 4 X) ((chinese-cns11643-7 . isolated) "I-C7-" 4 X) ((korean-ksc5601 . isolated) "I-K0-" 4 X) - ((=iso-ir165 . isolated) "I-EGB-" 4 X) - ((ideograph-daikanwa . isolated) "I-M-" 5 d) - ((chinese-big5 . isolated) "I-B-" 4 X) + ((=big5-eten . isolated) "I-B-" 4 X) ((latin-iso8859-1 . isolated) "I-LATIN1-" 2 X) ((latin-iso8859-2 . isolated) "I-LATIN2-" 2 X) ((latin-iso8859-3 . isolated) "I-LATIN3-" 2 X) @@ -258,37 +288,10 @@ ((=hanyo-denshi/jt . isolated) "I-HD-JT-" 4 X) ((=hanyo-denshi/ks . isolated) "I-HD-KS-" 6 d) ((=hanyo-denshi/ks/mf . isolated) "I-KSMF-" 5 d) - ( =adobe-japan1-6 "AJ1-" 5 d) - ( =adobe-japan1-base "I-AJ1-" 5 d) - ( =gt "GT-" 5 d) - ( =zinbun-oracle "ZOB-" 4 d) - ( =ruimoku-v6 "RUI6-" 4 X) - ( =big5-cdp "CDP-" 4 X) - ( =daikanwa "M-" 5 d) - ( =daikanwa@rev1 "r1M-" 5 d) - ( =gt-k "GT-K" 5 d) - ( ideograph-cbeta "CB" 5 d) - ( ideograph-hanziku-1 "HZK01-" 4 X) - ( ideograph-hanziku-2 "HZK02-" 4 X) - ( ideograph-hanziku-3 "HZK03-" 4 X) - ( ideograph-hanziku-4 "HZK04-" 4 X) - ( ideograph-hanziku-5 "HZK05-" 4 X) - ( ideograph-hanziku-6 "HZK06-" 4 X) - ( ideograph-hanziku-7 "HZK07-" 4 X) - ( ideograph-hanziku-8 "HZK08-" 4 X) - ( ideograph-hanziku-9 "HZK09-" 4 X) - ( ideograph-hanziku-10 "HZK10-" 4 X) - ( ideograph-hanziku-11 "HZK11-" 4 X) - ( ideograph-hanziku-12 "HZK12-" 4 X) - ((ideograph-hanziku-1 . isolated) "I-HZK1-" 4 X) - ( ideograph-hanziku-1 "HZK1-" 4 X) - ((ideograph-hanziku-2 . isolated) "I-HZK2-" 4 X) - ( ideograph-hanziku-2 "HZK2-" 4 X) - ( =jis-x0208@1990 "J90-" 4 X) - ( =jis-x0213-1@2000 "JX1-" 4 X) - ( =jis-x0213-2 "JX2-" 4 X) - ( =jis-x0213-1@2004 "JX3-" 4 X) - ( =jis-x0212 "JSP-" 4 X) + ((=hanziku-1 . isolated) "I-HZK1-" 4 X) + ( =hanziku-1 "HZK1-" 4 X) + ((=hanziku-2 . isolated) "I-HZK2-" 4 X) + ( =hanziku-2 "HZK2-" 4 X) ( =hanyo-denshi/ja "HD-JA-" 4 X) ( =hanyo-denshi/jb "HD-JB-" 4 X) ( =hanyo-denshi/jc "HD-JC-" 4 X) @@ -301,7 +304,6 @@ ( =hanyo-denshi/jt "HD-JT-" 4 X) ( =hanyo-denshi/ks "HD-KS-" 6 d) ( =hanyo-denshi/ks/mf "KSMF-" 5 d) - ( =jis-x0208@1983 "J83-" 4 X) ( =jis-x0208@1978 "J78-" 4 X) ( chinese-cns11643-1 "C1-" 4 X) ( chinese-cns11643-2 "C2-" 4 X) @@ -360,6 +362,7 @@ (=>>hanyo-denshi/ks "G-HD-KS-" 4 X) (=>>cbeta "G-CB" 5 d) ( =>jis-x0208@usual "o-J0-" 4 X) + (=+>jis-x0208@1978 "o-J78-" 4 X) ( =>jis-x0213-2@usual "o-JX2-" 4 X) ( =>jis-x0208@1997 "J97-" 4 X) ( =>jis-x0208@1997 "A-J0-" 4 X) @@ -375,6 +378,7 @@ ( =>ucs@jis "A-JU+" 4 X) ( =>ucs@cns "A-CU+" 4 X) ( =>ucs@JP "o-JU+" 4 X) + ( =>ucs@jis/1990 "o-J90U+" 4 X) (=>>ucs@iso "G-IU+" 4 X) (=>>ucs@unicode "G-UU+" 4 X) (=>>ucs@jis "G-JU+" 4 X) @@ -396,6 +400,7 @@ (=>>>ucs@cns "GI-CU+" 4 X) (=>>>ucs@jis/2004 "g2-J04U+" 4 X) (=>>>ucs@jis/2004 "GI-J04U+" 4 X) + (=>>>ucs@jis/1990 "g2-J90U+" 4 X) ( =ucs@iso "U-" 8 X) ( =ucs@unicode "UU+" 4 X) ( =ucs@unicode "UU-" 8 X) @@ -409,9 +414,11 @@ ( =ucs@ks "KU+" 4 X) ( =ucs@ks "KU-" 8 X) ( =ucs@JP "dJU+" 4 X) + ( =ucs@JP/hanazono "hanaJU+" 4 X) ( china3-jef "JC3-" 4 X) - ( chinese-big5 "B-" 4 X) - ( chinese-big5 "C0-" 4 X) + ( =big5 "B-" 4 X) + ( =big5 "C0-" 4 X) + ( =big5-eten "BE-" 4 X) ( =>big5-cdp "A-CDP-" 4 X) ( =>daikanwa "A-M-" 5 d) ( =jis-x0208@1978/i1 "J78i1-" 4 X)