X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fmule%2Fmule-coding.el;h=070172904e06d0aaf206c3b5706448535488b791;hb=4e6996e7de251659773d977a4f21b55b9d9b5606;hp=d3bc0c26edf15920bfcc884a1145a7f5999edc87;hpb=3124e24e9cbc987a13d2d8d1c270e1f6e91ada41;p=chise%2Fxemacs-chise.git.1

diff --git a/lisp/mule/mule-coding.el b/lisp/mule/mule-coding.el
index d3bc0c2..0701729 100644
--- a/lisp/mule/mule-coding.el
+++ b/lisp/mule/mule-coding.el
@@ -183,6 +183,7 @@
 (when (featurep 'utf-2000)
   (setq coded-charset-entity-reference-alist
 	'(((=adobe-japan1-base	. isolated)    "I-AJ1-" 5 d)
+	  ((=adobe-japan1-6	. isolated)    "I-AJ1-" 5 d)
 	  ((=gt			. isolated)     "I-GT-" 5 d)
 	  ((=ruimoku-v6		. isolated)   "I-RUI6-" 4 X)
 	  ((chinese-big5-cdp	. isolated)    "I-CDP-" 4 X)
@@ -240,6 +241,18 @@
 	  ((arabic-digit	. isolated) "I-MULE-ARBD-" 2 X)
 	  ((ipa			. isolated) "I-MULE-IPA-" 2 X)
 	  ((china3-jef		. isolated)    "I-JC3-" 4 X)
+	  ((=hanyo-denshi/ja	. isolated)  "I-HD-JA-" 4 X)
+	  ((=hanyo-denshi/jb	. isolated)  "I-HD-JB-" 4 X)
+	  ((=hanyo-denshi/jc	. isolated)  "I-HD-JC-" 4 X)
+	  ((=hanyo-denshi/jd	. isolated)  "I-HD-JD-" 4 X)
+	  ((=hanyo-denshi/ft	. isolated)  "I-HD-FT-" 4 X)
+	  ((=hanyo-denshi/ia	. isolated)  "I-HD-IA-" 4 X)
+	  ((=hanyo-denshi/ib	. isolated)  "I-HD-IB-" 4 X)
+	  ((=hanyo-denshi/hg	. isolated)  "I-HD-HG-" 4 X)
+	  ((=hanyo-denshi/ip	. isolated)  "I-HD-IP-" 4 X)
+	  ((=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)
@@ -267,11 +280,23 @@
 	  ((ideograph-hanziku-2 . isolated)   "I-HZK2-" 4 X)
 	  ( ideograph-hanziku-2                 "HZK2-" 4 X)
 	  ( =jis-x0208@1990			 "J90-" 4 X)
-	  ( =jis-x0208@1983			 "J83-" 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)
+	  ( =hanyo-denshi/ja		       "HD-JA-" 4 X)
+	  ( =hanyo-denshi/jb		       "HD-JB-" 4 X)
+	  ( =hanyo-denshi/jc		       "HD-JC-" 4 X)
+	  ( =hanyo-denshi/jd		       "HD-JD-" 4 X)
+	  ( =hanyo-denshi/ft		       "HD-FT-" 4 X)
+	  ( =hanyo-denshi/ia		       "HD-IA-" 4 X)
+	  ( =hanyo-denshi/ib		       "HD-IB-" 4 X)
+	  ( =hanyo-denshi/hg		       "HD-HG-" 4 X)
+	  ( =hanyo-denshi/ip		       "HD-IP-" 4 X)
+	  ( =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)
@@ -317,6 +342,7 @@
 	  (=>>big5-cdp			       "G-CDP-" 4 X)
 	  (=>>gt-k			       "G-GT-K" 5 d)
 	  (=>>ruimoku-v6		      "G-RUI6-" 4 X)
+	  (=>>hanyo-denshi/ft		     "G-HD-FT-" 4 X)
 	  ( =>jis-x0208@usual			"o-J0-" 4 X)
 	  ( =>jis-x0208@1997			 "J97-" 4 X)
 	  ( =>jis-x0208@1997			"A-J0-" 4 X)