From: tomo <tomo>
Date: Thu, 22 Apr 2010 05:44:14 +0000 (+0000)
Subject: (coded-charset-entity-reference-alist): Add settings for &I-AJ1-ddddd;
X-Git-Tag: r21-4-22-chise-0_24-aj1-bc^20~54
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=f7591049fb8f211a31bff81b6b63266ef0586a85;p=chise%2Fxemacs-chise.git.1

(coded-charset-entity-reference-alist): Add settings for &I-AJ1-ddddd;
and &AJ1-ddddd;.
---

diff --git a/lisp/mule/mule-coding.el b/lisp/mule/mule-coding.el
index ab70299..e213fb7 100644
--- a/lisp/mule/mule-coding.el
+++ b/lisp/mule/mule-coding.el
@@ -182,7 +182,8 @@
 
 (when (featurep 'utf-2000)
   (setq coded-charset-entity-reference-alist
-	'(((=gt			. isolated)     "I-GT-" 5 d)
+	'(((=adobe-japan1-base	. 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)
 	  ((=gt-k		. isolated)    "I-GT-K" 5 d)
@@ -239,6 +240,8 @@
 	  ((arabic-digit	. isolated) "I-MULE-ARBD-" 2 X)
 	  ((ipa			. isolated) "I-MULE-IPA-" 2 X)
 	  ((china3-jef		. isolated)    "I-JC3-" 4 X)
+	  ( =adobe-japan1-6			 "AJ1-" 5 d)
+	  ( =adobe-japan1-base		       "I-AJ1-" 5 d)
 	  ( =gt					  "GT-" 5 d)
 	  (=>>gt				"G-GT-" 5 d)
 	  (=>>gt				 "aGT-" 5 d)