Sync up with r21-4-12-chise-0_21-gt-j0-r166.

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

diff --git a/lisp/mule/mule-conf.el b/lisp/mule/mule-conf.el
index afb7220..f518582 100644 (file)
--- a/lisp/mule/mule-conf.el
+++ b/lisp/mule/mule-conf.el
@@ -26,9 +26,13 @@
 ;;; Code:
 
 (define-charset-alias 'japanese-jisx0208-1978  '=jis-x0208-1978)
+(define-charset-alias 'chinese-gb2312          '=gb2312)
 (define-charset-alias 'japanese-jisx0208       '=jis-x0208-1983)
 (define-charset-alias 'korean-ksc5601          '=ks-x1001)
 (define-charset-alias 'japanese-jisx0212       '=jis-x0212)
+(define-charset-alias 'chinese-cns11643-1      '=cns11643-1)
+(define-charset-alias 'chinese-cns11643-2      '=cns11643-2)
+(define-charset-alias 'chinese-gb12345         '=gb12345)
 (define-charset-alias 'chinese-big5            '=big5)
 
 ;; PinYin-ZhuYin
@@ -98,11 +102,16 @@
         final ,final
         graphic 0))
       ))
-  (make-chinese-cns11643-charset 'chinese-cns11643-3 183 "3" ?I)
-  (make-chinese-cns11643-charset 'chinese-cns11643-4 184 "4" ?J)
-  (make-chinese-cns11643-charset 'chinese-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-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 '=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
@@ -222,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
@@ -234,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."