From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Sun, 20 Aug 2017 06:47:11 +0000 (+0900)
Subject: (=ucs-sip-itaiji-004): New coded-charset for XEmacs CHISE.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=d8a61d8e61e528457c1049b5e4f90cc1d3f6cb87;p=chise%2Fxemacs-chise.git-

(=ucs-sip-itaiji-004): New coded-charset for XEmacs CHISE.
(=>ucs-itaiji-004): Ditto.
(=>ucs-sip-itaiji-004): Ditto.
(=>ucs-bmp-itaiji-007): Ditto.
---

diff --git a/lisp/mule/mule-conf.el b/lisp/mule/mule-conf.el
index 39b7c14..e5348ca 100644
--- a/lisp/mule/mule-conf.el
+++ b/lisp/mule/mule-conf.el
@@ -4837,6 +4837,38 @@
 		  min-code #x2E00
 		  max-code #x9FCC
 		  registry "ucs\\.itaiji004-0"))
+  (make-charset '=ucs-sip-itaiji-004
+		"uXXXX-itaiji-004 glyph-images in SIP"
+		'(long-name	"UCS-SIP-itaiji-004"
+		  chars		256
+		  dimension	2
+		  columns	2
+		  graphic	2
+		  direction	l2r
+		  mother	=ucs-itaiji-004
+		  min-code #x20000 max-code #x2FFFF
+		  registry "ucs00\\.itaiji004-2"))
+  (make-charset '=>ucs-itaiji-004
+		"Abstract characters corresponding with uXXXX-itaiji-004 of GlyphWiki"
+		'(long-name	"UCS-itaiji-004"
+		  chars		256
+		  dimension	3
+		  columns	2
+		  graphic	2
+		  direction	l2r
+                  ;; =>iso-ir	177
+		  mother	=ucs-itaiji-004))
+  (make-charset '=>ucs-sip-itaiji-004
+		"uXXXX-itaiji-004 glyph-images in SIP"
+		'(long-name	"UCS-SIP-itaiji-004"
+		  chars		256
+		  dimension	2
+		  columns	2
+		  graphic	2
+		  direction	l2r
+		  mother	=>ucs-itaiji-004
+		  min-code #x20000 max-code #x2FFFF
+		  registry "ucs00\\.itaiji004-2"))
 
   (make-charset '=ucs-itaiji-005
 		"uXXXX-itaiji-005 glyphs of GlyphWiki"
@@ -4965,6 +4997,19 @@
 		  direction	l2r
                   ;; =>iso-ir	177
 		  mother	=ucs))
+  (make-charset '=>ucs-bmp-itaiji-007
+		"uXXXX-itaiji-007's abstract characters in BMP"
+		'(long-name	"UCS-BMP-itaiji-007 characters"
+		  chars		256
+		  dimension	2
+		  columns	2
+		  graphic	2
+		  direction	l2r
+                  ;; =>iso-ir	177
+		  mother	=>ucs-itaiji-007
+		  min-code #x2E00
+		  max-code #x9FCC
+		  registry "ucs\\.itaiji007-0"))
   (make-charset '=>ucs-sip-itaiji-007
 		"uXXXX-itaiji-007 characters in SIP"
 		'(long-name	"UCS-SIP-itaiji-007"