X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fmule%2Fmule-coding.el;h=111b54ef9a5a215f140cb65ea7342ed99efc6cb7;hb=e944f7e6d3d1abfcdc433e34fa5b5d6e8c09ba1c;hp=58b155c82d27ff52db738c40175384ac00b62ac0;hpb=d926c7aae5d17ac0319eb7ffee0c4605548935fa;p=chise%2Fxemacs-chise.git-

diff --git a/lisp/mule/mule-coding.el b/lisp/mule/mule-coding.el
index 58b155c..111b54e 100644
--- a/lisp/mule/mule-coding.el
+++ b/lisp/mule/mule-coding.el
@@ -434,6 +434,7 @@
 	  ( =ucs-var-003		      "U-v003+" 4 X)
 	  ( =ucs-var-004		      "U-v004+" 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)
@@ -444,6 +445,10 @@
 	  ( =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-003		    "CDP-v003-" 4 X)
 	  ( =big5-cdp-var-004		    "CDP-v004-" 4 X)
 	  ( =big5-cdp-var-005		    "CDP-v005-" 4 X)
@@ -588,6 +593,7 @@
 	  (=>cns11643-5				"A-C5-" 4 X)
 	  (=>cns11643-7				"A-C7-" 4 X)
 	  (=>big5-cdp			       "A-CDP-" 4 X)
+	  (=>big5-cdp-itaiji-001	  "A-CDP-i001-" 4 X)
 	  ( =jis-x0208@1978/i1		       "J78i1-" 4 X)
 	  ( =shinjigen@rev			"SJG2-" 4 d)
 	  ( =shinjigen@1ed			"SJG1-" 4 d)