update.

[chise/xemacs-chise.git.1] / lisp / mule / mule-conf.el

diff --git a/lisp/mule/mule-conf.el b/lisp/mule/mule-conf.el
index 21b0dc3..f518582 100644 (file)
--- a/lisp/mule/mule-conf.el
+++ b/lisp/mule/mule-conf.el
@@ -105,11 +105,13 @@
   (make-chinese-cns11643-charset '=cns11643-3 183 "3" ?I)
   (make-chinese-cns11643-charset '=cns11643-4 184 "4" ?J)
   (make-chinese-cns11643-charset '=cns11643-5 185 "5" ?K)
-  (make-chinese-cns11643-charset 'chinese-cns11643-6 186 "6" ?L)
-  (make-chinese-cns11643-charset 'chinese-cns11643-7 187 "7" ?M)
+  (make-chinese-cns11643-charset '=cns11643-6 186 "6" ?L)
+  (make-chinese-cns11643-charset '=cns11643-7 187 "7" ?M)
   (define-charset-alias 'chinese-cns11643-3    '=cns11643-3)
   (define-charset-alias 'chinese-cns11643-4    '=cns11643-4)
   (define-charset-alias 'chinese-cns11643-5    '=cns11643-5)
+  (define-charset-alias 'chinese-cns11643-6    '=cns11643-6)
+  (define-charset-alias 'chinese-cns11643-7    '=cns11643-7)
   )
 
 ;; JIS X 0213:2000
@@ -229,7 +231,7 @@
                  mother        =ucs))
   (define-charset-alias 'ucs-big5 '=ucs@big5)
 
-  (make-charset 'ideograph-daikanwa
+  (make-charset '=daikanwa
                "Daikanwa"
                `(long-name     "Daikanwa dictionary (revised version 2)"
                  chars         256
@@ -241,6 +243,7 @@
                  min-code      #xE00000
                  max-code      ,(+ #xE00000 50100)
                  code-offset   #xE00000))
+  (define-charset-alias 'ideograph-daikanwa '=daikanwa)
 
   (make-charset '=daikanwa-rev1
                "Daikanwa Rev."