X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fmule%2Fmule-coding.el;h=01b758f7ef0d475237ec9a17a6c88886a65d1776;hb=8cf556a9542761e924ece4c0b6266ca20628248f;hp=8f2d9e72aa187f15bb697d5e7a5b7e7bf7175489;hpb=c9499898e964756d9aaec463701e33a6d04ffc36;p=chise%2Fxemacs-chise.git-

diff --git a/lisp/mule/mule-coding.el b/lisp/mule/mule-coding.el
index 8f2d9e7..01b758f 100644
--- a/lisp/mule/mule-coding.el
+++ b/lisp/mule/mule-coding.el
@@ -361,8 +361,10 @@
 	  (=>>hanyo-denshi/jt		     "G-HD-JT-" 4 X)
 	  (=>>hanyo-denshi/ks		     "G-HD-KS-" 4 X)
 	  (=>>cbeta   		           	 "G-CB" 5 d)
-	  ( =>jis-x0208@usual			"o-J0-" 4 X)
-	  ( =>jis-x0213-2@usual		       "o-JX2-" 4 X)
+	  (=+>jis-x0208				"o-J0-" 4 X)
+	  (=+>jis-x0213-1		       "o-JX1-" 4 X)
+	  (=+>jis-x0213-2		       "o-JX2-" 4 X)
+	  (=+>jis-x0208@1978		       "o-J78-" 4 X)
 	  ( =>jis-x0208@1997			 "J97-" 4 X)
 	  ( =>jis-x0208@1997			"A-J0-" 4 X)
 	  ( =>jis-x0213-1@2000		       "A-JX1-" 4 X)
@@ -376,7 +378,11 @@
 	  ( =>ucs@unicode			"A-UU+" 4 X)
 	  ( =>ucs@jis				"A-JU+" 4 X)
 	  ( =>ucs@cns				"A-CU+" 4 X)
-	  ( =>ucs@JP				"o-JU+" 4 X)
+	  ( =>ucs@ks				"A-KU+" 4 X)
+	  (=+>ucs@iso				"o-IU+" 4 X)
+	  (=+>ucs@jis				"o-JU+" 4 X)
+	  (=+>ucs@jis/1990		      "o-J90U+" 4 X)
+	  (=+>ucs@cns				"o-CU+" 4 X)
 	  (=>>ucs@iso				"G-IU+" 4 X)
 	  (=>>ucs@unicode			"G-UU+" 4 X)
 	  (=>>ucs@jis				"G-JU+" 4 X)
@@ -398,6 +404,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)
@@ -411,6 +418,7 @@
 	  ( =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)
 	  ( =big5				   "B-" 4 X)
 	  ( =big5				  "C0-" 4 X)