From: MORIOKA Tomohiko Date: Thu, 18 May 2017 09:40:26 +0000 (+0900) Subject: (coded-charset-entity-reference-alist): Modify some priorities. X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=15f8915897d1337f69b271e17709016f40942b8e;p=chise%2Fxemacs-chise.git.1 (coded-charset-entity-reference-alist): Modify some priorities. --- diff --git a/lisp/mule/mule-coding.el b/lisp/mule/mule-coding.el index b532e73..1f7399d 100644 --- a/lisp/mule/mule-coding.el +++ b/lisp/mule/mule-coding.el @@ -350,16 +350,45 @@ (===ks-x1001 "R-K0-" 4 X) ( =iso-ir165 "EGB-" 4 X) ( =jis-x0208@1983 "J83-" 4 X) - ( =jis-x0208@1978 "J78-" 4 X) + ( =koseki "KOSEKI-" 6 d) + ( =ucs-var-001 "U-v001+" 4 X) + ( =ucs-var-002 "U-v002+" 4 X) + ( =ucs-var-003 "U-v003+" 4 X) + ( =ucs-var-004 "U-v004+" 4 X) + ( =ucs-var-005 "U-v005+" 4 X) + ( =ucs-var-006 "U-v006+" 4 X) + ( =ucs-var-008 "U-v008+" 4 X) + ( =ucs-var-010 "U-v010+" 4 X) + ( =ucs-itaiji-001 "U-i001+" 4 X) + ( =ucs-itaiji-002 "U-i002+" 4 X) + ( =ucs-itaiji-003 "U-i003+" 4 X) + ( =ucs-itaiji-004 "U-i004+" 4 X) + ( =ucs-itaiji-005 "U-i005+" 4 X) + ( =ucs-itaiji-006 "U-i006+" 4 X) + ( =ucs-itaiji-007 "U-i007+" 4 X) + ( =ucs-itaiji-008 "U-i008+" 4 X) + ( =ucs-itaiji-009 "U-i009+" 4 X) + ( =ucs-itaiji-084 "U-i084+" 4 X) + ( =big5-cdp-var-001 "CDP-v001-" 4 X) + ( =big5-cdp-var-002 "CDP-v002-" 4 X) + ( =big5-cdp-var-003 "CDP-v003-" 4 X) + ( =big5-cdp-var-004 "CDP-v004-" 4 X) + ( =big5-cdp-var-005 "CDP-v005-" 4 X) + ( =big5-cdp-itaiji-001 "CDP-i001-" 4 X) + ( =big5-cdp-itaiji-002 "CDP-i002-" 4 X) + ( =big5-cdp-itaiji-003 "CDP-i003-" 4 X) + ( =jis-x0208@1978/1pr "J78-" 4 X) ( =gt-k "GT-K" 5 d) + (==jis-x0208@1983 "g2-J83-" 4 X) + (==koseki "g2-KOSEKI-" 6 d) + (==ucs-itaiji-003 "g2-U-i003+" 4 X) + (==ucs-itaiji-005 "g2-U-i005+" 4 X) + (==big5-cdp-itaiji-001 "g2-CDP-i001-" 4 X) + (==jis-x0208@1978/1pr "g2-J78-" 4 X) (==gt-k "g2-GT-K" 5 d) (===gt-k "R-GT-K" 5 d) - (==jis-x0208@1983 "g2-J83-" 4 X) - (==jis-x0208@1978 "g2-J78-" 4 X) (===jis-x0208@1983 "R-J83-" 4 X) (===jis-x0208@1978 "R-J78-" 4 X) - ( =koseki "KOSEKI-" 6 d) - (==koseki "g2-KOSEKI-" 6 d) ( =cbeta "CB" 5 d) (=>cbeta "A-CB" 5 d) (==cbeta "g2-CB" 5 d) @@ -429,33 +458,6 @@ ((=hanziku-2 . isolated) "I-HZK2-" 4 X) ( =hanziku-2 "HZK2-" 4 X) ( =hanyo-denshi/ks/mf "KSMF-" 5 d) - ( =ucs-var-001 "U-v001+" 4 X) - ( =ucs-var-002 "U-v002+" 4 X) - ( =ucs-var-003 "U-v003+" 4 X) - ( =ucs-var-004 "U-v004+" 4 X) - ( =ucs-var-005 "U-v005+" 4 X) - ( =ucs-var-006 "U-v006+" 4 X) - ( =ucs-var-008 "U-v008+" 4 X) - ( =ucs-var-010 "U-v010+" 4 X) - ( =ucs-itaiji-001 "U-i001+" 4 X) - ( =ucs-itaiji-002 "U-i002+" 4 X) - ( =ucs-itaiji-003 "U-i003+" 4 X) - ( =ucs-itaiji-004 "U-i004+" 4 X) - ( =ucs-itaiji-005 "U-i005+" 4 X) - ( =ucs-itaiji-006 "U-i006+" 4 X) - ( =ucs-itaiji-007 "U-i007+" 4 X) - ( =ucs-itaiji-008 "U-i008+" 4 X) - ( =ucs-itaiji-009 "U-i009+" 4 X) - ( =ucs-itaiji-084 "U-i084+" 4 X) - ( =big5-cdp-itaiji-001 "CDP-i001-" 4 X) - (==big5-cdp-itaiji-001 "g2-CDP-i001-" 4 X) - ( =big5-cdp-itaiji-002 "CDP-i002-" 4 X) - ( =big5-cdp-itaiji-003 "CDP-i003-" 4 X) - ( =big5-cdp-var-001 "CDP-v001-" 4 X) - ( =big5-cdp-var-002 "CDP-v002-" 4 X) - ( =big5-cdp-var-003 "CDP-v003-" 4 X) - ( =big5-cdp-var-004 "CDP-v004-" 4 X) - ( =big5-cdp-var-005 "CDP-v005-" 4 X) ( =big5-cdp-var-3 "CDP-var3-" 4 X) ( =big5-cdp-var-5 "CDP-var5-" 4 X) ( latin-iso8859-1 "LATIN1-" 2 X) @@ -602,7 +604,6 @@ (=>ucs-itaiji-001 "A-U-i001+" 4 X) (=>ucs-itaiji-002 "A-U-i002+" 4 X) (=>ucs-itaiji-005 "A-U-i005+" 4 X) - (==ucs-itaiji-005 "g2-U-i005+" 4 X) (=>ucs-itaiji-006 "A-U-i006+" 4 X) (=>big5-cdp-itaiji-001 "A-CDP-i001-" 4 X) ( =jis-x0208@1978/i1 "J78i1-" 4 X)