From d662969008659335e5c60133e8556569f6ed1344 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Fri, 10 Mar 2017 01:46:58 +0900
Subject: [PATCH] (=>ucs-itaiji-002): Use `=ucs-itaiji-002' instead of `=ucs'
 as its mother. (==ucs-itaiji-002): New coded-charset for
 XEmacs CHISE. (==ucs-bmp-itaiji-002): Ditto.
 (==ucs-itaiji-003): Ditto. (==ucs-bmp-itaiji-003): Ditto.

---
 lisp/mule/mule-conf.el |   49 +++++++++++++++++++++++++++++++++++++++++++++++-
 1 file changed, 48 insertions(+), 1 deletion(-)

diff --git a/lisp/mule/mule-conf.el b/lisp/mule/mule-conf.el
index 2909877..2bff9e6 100644
--- a/lisp/mule/mule-conf.el
+++ b/lisp/mule/mule-conf.el
@@ -4582,7 +4582,7 @@
 		  graphic	2
 		  direction	l2r
                   ;; =>iso-ir	177
-		  mother	=ucs))
+		  mother	=ucs-itaiji-002))
   (make-charset '=>ucs-bmp-itaiji-002
 		"uXXXX-itaiji-002's abstract characters in BMP"
 		'(long-name	"UCS-BMP-itaiji-002 characters"
@@ -4607,6 +4607,29 @@
 		  mother	=>ucs-itaiji-002
 		  min-code #x20000 max-code #x2FFFF
 		  registry "ucs00\\.itaiji002-2"))
+  (make-charset '==ucs-itaiji-002
+		"Abstract glyph-forms corresponding with uXXXX-itaiji-002 of GlyphWiki"
+		'(long-name	"UCS-itaiji-002"
+		  chars		256
+		  dimension	3
+		  columns	2
+		  graphic	2
+		  direction	l2r
+                  ;; =>iso-ir	177
+		  mother	=ucs-itaiji-002))
+  (make-charset '==ucs-bmp-itaiji-002
+		"uXXXX-itaiji-002's abstract glyph-forms in BMP"
+		'(long-name	"UCS-BMP-itaiji-002 characters"
+		  chars		256
+		  dimension	2
+		  columns	2
+		  graphic	2
+		  direction	l2r
+                  ;; =>iso-ir	177
+		  mother	==ucs-itaiji-002
+		  min-code #x2E00
+		  max-code #x9FCC
+		  registry "ucs\\.itaiji002-0"))
 
   (make-charset '=ucs-itaiji-003
 		"uXXXX-itaiji-003 glyphs of GlyphWiki"
@@ -4642,6 +4665,30 @@
 		  mother	=ucs-itaiji-003
 		  min-code #x20000 max-code #x2FFFF
 		  registry "ucs00\\.itaiji003-2"))
+  (make-charset '==ucs-itaiji-003
+		"Abstract glyph-forms corresponding with uXXXX-itaiji-003 of GlyphWiki"
+		'(long-name	"UCS-itaiji-003"
+		  chars		256
+		  dimension	3
+		  columns	2
+		  graphic	2
+		  direction	l2r
+                  ;; =>iso-ir	177
+		  mother	=ucs-itaiji-003))
+  (make-charset '==ucs-bmp-itaiji-003
+		"uXXXX-itaiji-003's abstract glyph-forms in BMP"
+		'(long-name	"UCS-BMP-itaiji-003 characters"
+		  chars		256
+		  dimension	2
+		  columns	2
+		  graphic	2
+		  direction	l2r
+                  ;; =>iso-ir	177
+		  mother	==ucs-itaiji-003
+		  min-code #x2E00
+		  max-code #x9FCC
+		  registry "ucs\\.itaiji003-0"))
+
   (make-charset '=ucs-itaiji-004
 		"uXXXX-itaiji-004 glyphs of GlyphWiki"
 		'(long-name	"UCS-itaiji-004"
-- 
1.7.10.4