From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Tue, 15 Mar 2016 17:43:33 +0000 (+0900)
Subject: (=big5-cdp-var-003): Renamed from `=big5-cdp-var-3'; define
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=4128f10f8e92310e75eda920976b18ad56f2c855;p=chise%2Fxemacs-chise.git-

(=big5-cdp-var-003): Renamed from `=big5-cdp-var-3'; define
`=big5-cdp-var-3' as an alias of `=big5-cdp-var-003'.
(=big5-cdp-var-004): New coded-charset for XEmacs CHISE.
(=big5-cdp-var-005): Renamed from `=big5-cdp-var-5'; define
`=big5-cdp-var-5' as an alias of `=big5-cdp-var-005'.
---

diff --git a/lisp/mule/mule-conf.el b/lisp/mule/mule-conf.el
index c84d312..2d7dee9 100644
--- a/lisp/mule/mule-conf.el
+++ b/lisp/mule/mule-conf.el
@@ -3402,9 +3402,9 @@
   ;;              direction l2r
   ;;              registry "zihai\\.cp-17$"))
 
-  (make-charset '=big5-cdp-var-3
-		"Big5-CDP-var-3 glyph-images of GlyphWiki"
-		'(long-name     "Big5-CDP-var-3"
+  (make-charset '=big5-cdp-var-003
+		"Big5-CDP-var-003 glyph-images of GlyphWiki"
+		'(long-name     "Big5-CDP-var-003"
 		  chars         256
 		  dimension     2
 		  columns       2
@@ -3412,10 +3412,22 @@
 		  direction     l2r
 		  registry      "cdp\\.var-3$"
 		  mother        =big5-cdp))
+  (define-charset-alias '=big5-cdp-var-3 '=big5-cdp-var-003)
 
-  (make-charset '=big5-cdp-var-5
-		"Big5-CDP-var-5 glyph-images of GlyphWiki"
-		'(long-name     "Big5-CDP-var-5"
+  (make-charset '=big5-cdp-var-004
+		"Big5-CDP-var-004 glyph-images of GlyphWiki"
+		'(long-name     "Big5-CDP-var-004"
+		  chars         256
+		  dimension     2
+		  columns       2
+		  graphic       2
+		  direction     l2r
+		  registry      "cdp\\.var-4$"
+		  mother        =big5-cdp))
+
+  (make-charset '=big5-cdp-var-005
+		"Big5-CDP-var-005 glyph-images of GlyphWiki"
+		'(long-name     "Big5-CDP-var-005"
 		  chars         256
 		  dimension     2
 		  columns       2
@@ -3423,6 +3435,7 @@
 		  direction     l2r
 		  registry      "cdp\\.var-5$"
 		  mother        =big5-cdp))
+  (define-charset-alias '=big5-cdp-var-5 '=big5-cdp-var-005)
 
   (make-charset '==>ucs@bucs
 		"Basic Subset of Coded Character Sets (BUCS)"