From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Mon, 5 Feb 2018 16:35:04 +0000 (+0900)
Subject: (=>>cns11643-1): Modify DOC; fix `=>iso-ir'.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=67c69b1b93e8123431584295415e814ebc4a2ca0;p=chise%2Fxemacs-chise.git

(=>>cns11643-1): Modify DOC; fix `=>iso-ir'.
(=>>cns11643-2): New coded-charset for XEmacs CHISE.
(=>>cns11643-3): Ditto.
(=>>cns11643-4): Modify DOC.
(=>>cns11643-6): New coded-charset for XEmacs CHISE.
---

diff --git a/lisp/mule/mule-conf.el b/lisp/mule/mule-conf.el
index f0e98e8..5ea49e6 100644
--- a/lisp/mule/mule-conf.el
+++ b/lisp/mule/mule-conf.el
@@ -1484,22 +1484,49 @@
 
   (make-charset
    '=>>cns11643-1
-   "CNS 11643 Plane 1 abstract glyphs."
+   "CNS 11643 Plane 1 detailed glyphs."
    '(registry "CNS11643[.-]\\(.*[.-]\\)?1$"
 	      dimension 2
 	      chars 94
 	      mother =cns11643-1
-	      =>iso-ir 184
+	      =>iso-ir 171
+	      graphic 0))
+  (make-charset
+   '=>>cns11643-2
+   "CNS 11643 Plane 2 detailed glyphs."
+   '(registry "CNS11643[.-]\\(.*[.-]\\)?2$"
+	      dimension 2
+	      chars 94
+	      mother =cns11643-2
+	      =>iso-ir 172
+	      graphic 0))
+  (make-charset
+   '=>>cns11643-3
+   "CNS 11643 Plane 3 detailed glyphs."
+   '(registry "CNS11643[.-]\\(.*[.-]\\)?3$"
+	      dimension 2
+	      chars 94
+	      mother =cns11643-3
+	      =>iso-ir 183
 	      graphic 0))
   (make-charset
    '=>>cns11643-4
-   "CNS 11643 Plane 4 abstract glyphs."
+   "CNS 11643 Plane 4 detailed glyphs."
    '(registry "CNS11643[.-]\\(.*[.-]\\)?4$"
 	      dimension 2
 	      chars 94
 	      mother =cns11643-4
 	      =>iso-ir 184
 	      graphic 0))
+  (make-charset
+   '=>>cns11643-6
+   "CNS 11643 Plane 6 detailed glyphs."
+   '(registry "CNS11643[.-]\\(.*[.-]\\)?6$"
+	      dimension 2
+	      chars 94
+	      mother =cns11643-6
+	      =>iso-ir 186
+	      graphic 0))
 
   (make-charset
    '=>cns11643-2
@@ -3999,6 +4026,7 @@
 		  graphic	2
 		  direction	l2r
 		  =>iso-ir	177
+		  ;; mother	=>ucs@iwds-1
 		  mother	=ucs@cns
 		  ;; mother	=>>ucs@cns
 		  ))