From: tomo <tomo>
Date: Sun, 16 Feb 2003 09:48:31 +0000 (+0000)
Subject: (=big5-cdp): Renamed from `chinese-big5-cdp'.
X-Git-Tag: r21-4-10-utf-2000-0_20-=big5-cdp~4
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=d47757584f6ae21bc03e955347bb0c9acfc07ead;p=chise%2Fxemacs-chise.git-

(=big5-cdp): Renamed from `chinese-big5-cdp'.
(chinese-big5-cdp): Changed to an alias for `=big5-cdp'.
---

diff --git a/lisp/mule/mule-conf.el b/lisp/mule/mule-conf.el
index 0f813dd..3f35999 100644
--- a/lisp/mule/mule-conf.el
+++ b/lisp/mule/mule-conf.el
@@ -181,45 +181,43 @@
 		  max-code	#xFEFE
 		  registry	"Big5\\.ETEN"))
   (define-charset-alias 'chinese-big5-eten '=big5-eten)
-  (make-charset
-   'chinese-big5-eten-a
-   "Big5-ETEN-a"
-   `(long-name "Big5 ETEN (#xF9D6 .. #xF9FE)"
-	       chars 256
-	       dimension 2
-	       columns 2
-	       graphic 2
-	       direction l2r
-	       mother chinese-big5
-	       min-code #xF9D6 max-code #xF9FE
-	       registry "Big5\\.ETEN"))
-  (make-charset
-   'chinese-big5-eten-b
-   "Big5-ETEN-b"
-   `(long-name "Big5 ETEN (#xC6A1 .. #xC8FE)"
-	       chars 256
-	       dimension 2
-	       columns 2
-	       graphic 2
-	       direction l2r
-	       mother chinese-big5
-	       min-code #xC6A1 max-code #xC8FE
-	       registry "Big5\\.ETEN"))
-  (make-charset
-   'chinese-big5-cdp
-   "Big5-CDP"
-   `(long-name "Big5 with CDP extension"
-	       chars 256
-	       dimension 2
-	       columns 2
-	       graphic 2
-	       direction l2r
-	       registry "big5\\.cdp-0"
-	       ;; min-code ,(lsh #x6200 16)
-	       ;; max-code ,(+ (lsh #x6200 16) #xFFFF)
-	       ;; code-offset ,(lsh #x6200 16)
-	       mother chinese-big5
-	       min-code #x8140 max-code #x8DFE))
+  (make-charset 'chinese-big5-eten-a
+		"Big5-ETEN-a"
+		`(long-name	"Big5 ETEN (#xF9D6 .. #xF9FE)"
+		  chars		256
+		  dimension	2
+		  columns	2
+		  graphic	2
+		  direction	l2r
+		  mother	chinese-big5
+		  min-code	#xF9D6
+		  max-code	#xF9FE
+		  registry	"Big5\\.ETEN"))
+  (make-charset 'chinese-big5-eten-b
+		"Big5-ETEN-b"
+		`(long-name	"Big5 ETEN (#xC6A1 .. #xC8FE)"
+		  chars		256
+		  dimension	2
+		  columns	2
+		  graphic	2
+		  direction	l2r
+		  mother	chinese-big5
+		  min-code	#xC6A1
+		  max-code	#xC8FE
+		  registry	"Big5\\.ETEN"))
+  (make-charset '=big5-cdp
+		"Big5-CDP"
+		`(long-name	"Big5 with CDP extension"
+		  chars		256
+		  dimension	2
+		  columns	2
+		  graphic	2
+		  direction	l2r
+		  registry	"big5\\.cdp-0"
+		  mother	chinese-big5
+		  min-code	#x8140
+		  max-code	#x8DFE))
+  (define-charset-alias 'chinese-big5-cdp '=big5-cdp)
   (make-charset
    'ideograph-gt-k
    "GT parts"