From: tomo <tomo>
Date: Fri, 28 Feb 2003 19:37:30 +0000 (+0000)
Subject: (=hanziku-*): Renamed from `ideograph-hanziku-*'.
X-Git-Tag: r21-4-10-utf-2000-0_20-=hanziku-x~3
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=643402bd952792e587fcbe6b39617186ea478d5a;p=chise%2Fxemacs-chise.git

(=hanziku-*): Renamed from `ideograph-hanziku-*'.
(ideograph-hanziku-*): Changed to an alias for `=hanziku-*'.
---

diff --git a/lisp/mule/mule-conf.el b/lisp/mule/mule-conf.el
index a2929ec..7b6bb48 100644
--- a/lisp/mule/mule-conf.el
+++ b/lisp/mule/mule-conf.el
@@ -246,7 +246,7 @@
 	 (hzk-max (+ hzk-min 65535)))
     (while (<= i 12)
       (make-charset
-       (intern (format "ideograph-hanziku-%d" i))
+       (intern (format "=hanziku-%d" i))
        (format "HANZIKU-%d" i)
        `(long-name ,(format "HANZIKU (pseudo BIG5 encoding) part %d" i)
 		   chars 256
@@ -258,6 +258,9 @@
 		   min-code ,hzk-min
 		   max-code ,hzk-max
 		   code-offset ,hzk-min))
+      (define-charset-alias
+	(intern (format "ideograph-hanziku-%d" i))
+	(intern (format "=hanziku-%d" i)))
       (setq hzk-min (1+ hzk-max)
 	    hzk-max (+ hzk-min 65535))
       (setq i (1+ i))))