From: tomo <tomo>
Date: Tue, 27 Jul 2010 03:38:59 +0000 (+0000)
Subject: (coded-charset-entity-reference-alist): Add settings for
X-Git-Tag: chise-base-0_25-1^20~433
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=c79e9f5b0f242ffafd41a7cc50c71094f9e52e3e;p=chise%2Fxemacs-chise.git

(coded-charset-entity-reference-alist): Add settings for
`=>>big5-cdp', `=>>gt-k', `=>>ucs@jis' and `=>>ucs@cns'.
---

diff --git a/lisp/mule/mule-coding.el b/lisp/mule/mule-coding.el
index 76e0097..1c0df9c 100644
--- a/lisp/mule/mule-coding.el
+++ b/lisp/mule/mule-coding.el
@@ -249,9 +249,11 @@
 	  ( =zinbun-oracle                       "ZOB-" 4 d)
 	  (=>zinbun-oracle                     "A-ZOB-" 4 d)
 	  ( =ruimoku-v6				"RUI6-" 4 X)
-	  ( chinese-big5-cdp		         "CDP-" 4 X)
+	  ( =big5-cdp			         "CDP-" 4 X)
+	  (=>>big5-cdp			       "G-CDP-" 4 X)
 	  ( ideograph-daikanwa                     "M-" 5 d)
 	  ( =gt-k				 "GT-K" 5 d)
+	  (=>>gt-k			       "G-GT-K" 5 d)
 	  ( ideograph-cbeta   		           "CB" 5 d)
 	  ( ideograph-hanziku-1                "HZK01-" 4 X)
 	  ( ideograph-hanziku-2                "HZK02-" 4 X)
@@ -323,19 +325,21 @@
 	  ( china3-jef                    	 "JC3-" 4 X)
 	  ( chinese-big5                    	   "B-" 4 X)
 	  ( chinese-big5                    	  "C0-" 4 X)
-	  ( =ucs@iso                    	   "U-" 8 X)
-	  ( =ucs@unicode                    	  "UU+" 4 X)
-	  ( =ucs@unicode                    	  "UU-" 8 X)
-	  ( =ucs@iso                    	   "U+" 4 X)
-	  ( =ucs@gb	                    	  "GU+" 4 X)
-	  ( =ucs@gb	                    	  "GU-" 8 X)
-	  ( =ucs@jis	                    	  "JU+" 4 X)
-	  ( =ucs@jis	                    	  "JU-" 8 X)
-	  ( =ucs@cns	                    	  "CU+" 4 X)
-	  ( =ucs@cns	                    	  "CU-" 8 X)
-	  ( =ucs@ks	                    	  "KU+" 4 X)
-	  ( =ucs@ks	                    	  "KU-" 8 X)
+	  ( =ucs@iso				   "U-" 8 X)
+	  ( =ucs@unicode			  "UU+" 4 X)
+	  ( =ucs@unicode			  "UU-" 8 X)
+	  ( =ucs@iso				   "U+" 4 X)
+	  ( =ucs@gb				  "GU+" 4 X)
+	  ( =ucs@gb				  "GU-" 8 X)
+	  ( =ucs@jis				  "JU+" 4 X)
+	  ( =ucs@jis				  "JU-" 8 X)
+	  ( =ucs@cns				  "CU+" 4 X)
+	  ( =ucs@cns				  "CU-" 8 X)
+	  ( =ucs@ks				  "KU+" 4 X)
+	  ( =ucs@ks				  "KU-" 8 X)
 	  (=>>ucs@unicode                    	"G-UU+" 4 X)
+	  (=>>ucs@jis				"G-JU+" 4 X)
+	  (=>>ucs@cns				"G-CU+" 4 X)
 	  ( =jis-x0208@1978/i1                 "J78i1-" 4 X)
 	  ( =shinjigen@rev                      "SJG2-" 4 d)
 	  ( =shinjigen@1ed                      "SJG1-" 4 d)