X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fmule%2Fmule-coding.el;h=a2d9feee304f0d494a3cf72bbbc673d82b60e68b;hb=35f837dc0a79e88322fe0bbb543e2fb34d39e1d5;hp=e8efabc581044d70ee10f9724a06327ea465f351;hpb=9b510deb329b922ff7dc2bf77527eae1b1bbd143;p=chise%2Fxemacs-chise.git

diff --git a/lisp/mule/mule-coding.el b/lisp/mule/mule-coding.el
index e8efabc..a2d9fee 100644
--- a/lisp/mule/mule-coding.el
+++ b/lisp/mule/mule-coding.el
@@ -334,27 +334,35 @@
 	  ( arabic-2-column                "MULE-ARB2-" 2 X)
 	  ( arabic-digit		   "MULE-ARBD-" 2 X)
 	  ( ipa                             "MULE-IPA-" 2 X)
+	  (=>>>jis-x0208		       "g2-J0-" 4 X)
+	  (=>>>jis-x0208		       "GI-J0-" 4 X)
+	  (=>>>jis-x0213-1		      "g2-JX1-" 4 X)
+	  (=>>>jis-x0213-1		      "GI-JX1-" 4 X)
+	  (=>>>jis-x0213-2		      "g2-JX2-" 4 X)
+	  (=>>>jis-x0213-1@2004		      "g2-JX3-" 4 X)
+	  (=>>>jis-x0213-1@2004		      "GI-JX3-" 4 X)
+	  (=>>>hanyo-denshi/jt		    "g2-HD-JT-" 4 X)
+	  (=>>>gt			       "g2-GT-" 5 d)
 	  (=>>gt				"G-GT-" 5 d)
-	  (=>>gt				 "aGT-" 5 d)
 	  (=>>jis-x0208				"G-J0-" 4 X)
 	  (=>>jis-x0213-1@2000		       "G-JX1-" 4 X)
-	  (=>>jis-x0213-2	   	       "G-JX2-" 4 X)
+	  (=>>jis-x0213-2		       "G-JX2-" 4 X)
 	  (=>>jis-x0213-1@2004		       "G-JX3-" 4 X)
-	  (=>>jis-x0213-1@2000		        "aJX1-" 4 X)
-	  (=>>jis-x0213-2	   		"aJX2-" 4 X)
-	  (=>>jis-x0213-1@2004		        "aJX3-" 4 X)
+	  (=>>adobe-japan1		       "G-AJ1-" 5 d)
 	  (=>>jis-x0208@1978		       "G-J78-" 4 X)
 	  (=>>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)
+	  (=>>hanyo-denshi/ia		     "G-HD-IA-" 4 X)
+	  (=>>hanyo-denshi/ib		     "G-HD-IB-" 4 X)
 	  (=>>hanyo-denshi/jt		     "G-HD-JT-" 4 X)
 	  (=>>hanyo-denshi/ks		     "G-HD-KS-" 4 X)
 	  ( =>jis-x0208@usual			"o-J0-" 4 X)
+	  ( =>jis-x0213-2@usual		       "o-JX2-" 4 X)
 	  ( =>jis-x0208@1997			 "J97-" 4 X)
 	  ( =>jis-x0208@1997			"A-J0-" 4 X)
 	  ( =>jis-x0213-1@2000		       "A-JX1-" 4 X)
-	  ( =>jis-x0213-2@usual		       "o-JX2-" 4 X)
 	  ( =>jis-x0213-2		       "A-JX2-" 4 X)
 	  ( =>jis-x0213-1@2004		       "A-JX3-" 4 X)
 	  ( =>gt				"A-GT-" 5 d)
@@ -374,6 +382,19 @@
 	  (=>>ucs@jis/2004		      "G-J04U+" 4 X)
 	  (=>>ucs@jis/2000		      "G-J00U+" 4 X)
 	  (=>>ucs@jis/1990		      "G-J90U+" 4 X)
+	  (=>>ucs@JP			       "G-dJU+" 4 X)
+	  (=>>>ucs@iso			       "g2-IU+" 4 X)
+	  (=>>>ucs@iso			       "GI-IU+" 4 X)
+	  (=>>>ucs@unicode		       "g2-UU+" 4 X)
+	  (=>>>ucs@unicode		       "GI-UU+" 4 X)
+	  (=>>>ucs@jis			       "g2-JU+" 4 X)
+	  (=>>>ucs@jis			       "GI-JU+" 4 X)
+	  (=>>>ucs@ks			       "g2-KU+" 4 X)
+	  (=>>>ucs@ks			       "GI-KU+" 4 X)
+	  (=>>>ucs@cns			       "g2-CU+" 4 X)
+	  (=>>>ucs@cns			       "GI-CU+" 4 X)
+	  (=>>>ucs@jis/2004		     "g2-J04U+" 4 X)
+	  (=>>>ucs@jis/2004		     "GI-J04U+" 4 X)
 	  ( =ucs@iso				   "U-" 8 X)
 	  ( =ucs@unicode			  "UU+" 4 X)
 	  ( =ucs@unicode			  "UU-" 8 X)
@@ -386,6 +407,7 @@
 	  ( =ucs@cns				  "CU-" 8 X)
 	  ( =ucs@ks				  "KU+" 4 X)
 	  ( =ucs@ks				  "KU-" 8 X)
+	  ( =ucs@JP				 "dJU+" 4 X)
 	  ( china3-jef				 "JC3-" 4 X)
 	  ( chinese-big5			   "B-" 4 X)
 	  ( chinese-big5			  "C0-" 4 X)