From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Wed, 5 Apr 2017 05:50:41 +0000 (+0900)
Subject: (==ucs-itaiji-005): New coded-charset for XEmacs CHISE.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=7a9b6e3ba10cc8b2b9c02249aee9569eda02d540;p=chise%2Fxemacs-chise.git-

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

diff --git a/lisp/mule/mule-conf.el b/lisp/mule/mule-conf.el
index f712834..83bf4c6 100644
--- a/lisp/mule/mule-conf.el
+++ b/lisp/mule/mule-conf.el
@@ -4792,6 +4792,29 @@
 		  min-code #x2E00
 		  max-code #x9FCC
 		  registry "ucs\\.itaiji005-0"))
+  (make-charset '==ucs-itaiji-005
+		"Abstract glyph-forms corresponding with uXXXX-itaiji-005 of GlyphWiki"
+		'(long-name	"UCS-itaiji-005"
+		  chars		256
+		  dimension	3
+		  columns	2
+		  graphic	2
+		  direction	l2r
+                  ;; =>iso-ir	177
+		  mother	=ucs-itaiji-005))
+  (make-charset '==ucs-bmp-itaiji-005
+		"uXXXX-itaiji-005's abstract glyph-forms in BMP"
+		'(long-name	"UCS-BMP-itaiji-005 characters"
+		  chars		256
+		  dimension	2
+		  columns	2
+		  graphic	2
+		  direction	l2r
+                  ;; =>iso-ir	177
+		  mother	==ucs-itaiji-005
+		  min-code #x2E00
+		  max-code #x9FCC
+		  registry "ucs\\.itaiji005-0"))
 
   (make-charset '=ucs-itaiji-006
 		"uXXXX-itaiji-006 glyphs of GlyphWiki"
@@ -4840,6 +4863,30 @@
 		  max-code #x9FCC
 		  registry "ucs\\.itaiji006-0"))
 
+  (make-charset '=ucs-itaiji-007
+		"uXXXX-itaiji-007 glyphs of GlyphWiki"
+		'(long-name	"UCS-itaiji-007"
+		  chars		256
+		  dimension	3
+		  columns	2
+		  graphic	2
+		  direction	l2r
+                  ;; =>iso-ir	177
+		  mother	=ucs))
+  (make-charset '=ucs-bmp-itaiji-007
+		"uXXXX-itaiji-007 glyph-images in BMP"
+		'(long-name	"UCS-BMP-itaiji-007"
+		  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-itaiji-008
 		"uXXXX-itaiji-008 glyphs of GlyphWiki"
 		'(long-name	"UCS-itaiji-008"