X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;ds=sidebyside;f=lisp%2Fmule%2Fmule-conf.el;h=f5185821592cc8d9d33750fd76262813b30952d8;hb=86ee3bc0c7c643f7166fb356d26e1e0f863b3339;hp=afb722038494c4ff0bc4914f0a02c50d7d95cb8c;hpb=64bc9e0d1859d5e43c23d2e9dd4b90379276cfac;p=chise%2Fxemacs-chise.git-

diff --git a/lisp/mule/mule-conf.el b/lisp/mule/mule-conf.el
index afb7220..f518582 100644
--- 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."