X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;ds=sidebyside;f=lisp%2Fmule%2Fmule-conf.el;h=8121bfdfae93f79dd52f5db182176ad119eec10f;hb=be2a2fe09f6bee55d7d3df5e37f3b4489fb02b28;hp=d13d72e58c8da07a35cc948b51e25e9a3cc16d77;hpb=e6cabefe6eff734873932a4113571e09413cda46;p=chise%2Fxemacs-chise.git

diff --git a/lisp/mule/mule-conf.el b/lisp/mule/mule-conf.el
index d13d72e..8121bfd 100644
--- a/lisp/mule/mule-conf.el
+++ b/lisp/mule/mule-conf.el
@@ -3744,6 +3744,16 @@
 		  direction     l2r
 		  registry      "cdp\\.itaiji-2$"
 		  mother        =big5-cdp))
+  (make-charset '=>big5-cdp-itaiji-002
+		"Big5-CDP-itaiji-002 abstract characters of GlyphWiki"
+		'(long-name     "Big5-CDP-itaiji-002"
+		  chars         256
+		  dimension     2
+		  columns       2
+		  graphic       2
+		  direction     l2r
+		  registry      "cdp\\.itaiji-2$"
+		  mother        =big5-cdp-itaiji-002))
 
   (make-charset '=big5-cdp-itaiji-003
 		"Big5-CDP-itaiji-003 glyphs of GlyphWiki"
@@ -3766,6 +3776,38 @@
 		  registry      "cdp\\.itaiji-3$"
 		  mother        =big5-cdp-itaiji-003))
 
+  (make-charset '=big5-cdp-itaiji-004
+		"Big5-CDP-itaiji-004 glyphs of GlyphWiki"
+		'(long-name     "Big5-CDP-itaiji-004"
+		  chars         256
+		  dimension     2
+		  columns       2
+		  graphic       2
+		  direction     l2r
+		  registry      "cdp\\.itaiji-4$"
+		  mother        =big5-cdp))
+  (make-charset '=>big5-cdp-itaiji-004
+		"Big5-CDP-itaiji-004 abstract characters of GlyphWiki"
+		'(long-name     "Big5-CDP-itaiji-004"
+		  chars         256
+		  dimension     2
+		  columns       2
+		  graphic       2
+		  direction     l2r
+		  registry      "cdp\\.itaiji-4$"
+		  mother        =big5-cdp-itaiji-004))
+
+  (make-charset '=big5-cdp-itaiji-005
+		"Big5-CDP-itaiji-005 glyphs of GlyphWiki"
+		'(long-name     "Big5-CDP-itaiji-005"
+		  chars         256
+		  dimension     2
+		  columns       2
+		  graphic       2
+		  direction     l2r
+		  registry      "cdp\\.itaiji-5$"
+		  mother        =big5-cdp))
+
   (make-charset '=big5-cdp-var-001
 		"Big5-CDP-var-001 glyphs of GlyphWiki"
 		'(long-name     "Big5-CDP-var-001"
@@ -4648,7 +4690,7 @@
                   ;; =>iso-ir	177
 		  mother	=ucs-var-001
 		  min-code #x2E00
-		  max-code #x9FCC
+		  max-code #x9FEA
 		  registry "ucs\\.var001-0"))
   (make-charset '=ucs-sip-var-001
 		"uXXXX-var-001 glyph-images in SIP"
@@ -4661,6 +4703,40 @@
 		  mother	=ucs-var-001
 		  min-code #x20000 max-code #x2FFFF
 		  registry "ucs00\\.var001-2"))
+  (make-charset '=ucs-tip-var-001
+		"uXXXX-var-001 glyph-images in TIP"
+		'(long-name	"UCS-TIP-var-001"
+		  chars		256
+		  dimension	2
+		  columns	2
+		  graphic	2
+		  direction	l2r
+		  mother	=ucs-var-001
+		  min-code #x30000 max-code #x3FFFF
+		  registry "ucs00\\.var001-3"))
+  (make-charset '==ucs-var-001
+		"Abstract glyph-forms corresponding with uXXXX-var-001 of GlyphWiki"
+		'(long-name	"UCS-var-001"
+		  chars		256
+		  dimension	3
+		  columns	2
+		  graphic	2
+		  direction	l2r
+                  ;; =>iso-ir	177
+		  mother	=ucs-var-001))
+  (make-charset '==ucs-bmp-var-001
+		"uXXXX-var-001's abstract glyph-forms in BMP"
+		'(long-name	"UCS-BMP-var-001 glyph-forms"
+		  chars		256
+		  dimension	2
+		  columns	2
+		  graphic	2
+		  direction	l2r
+                  ;; =>iso-ir	177
+		  mother	==ucs-var-001
+		  min-code #x2E00
+		  max-code #x9FCC
+		  registry "ucs\\.var001-0"))
 
   (make-charset '=ucs-var-002
 		"uXXXX-var-002 glyph-images of GlyphWiki"
@@ -4696,6 +4772,17 @@
 		  mother	=ucs-var-002
 		  min-code #x20000 max-code #x2FFFF
 		  registry "ucs00\\.var002-2"))
+  (make-charset '=ucs-tip-var-002
+		"uXXXX-var-002 glyph-images in TIP"
+		'(long-name	"UCS-TIP-var-002"
+		  chars		256
+		  dimension	2
+		  columns	2
+		  graphic	2
+		  direction	l2r
+		  mother	=ucs-var-002
+		  min-code #x30000 max-code #x3FFFF
+		  registry "ucs00\\.var002-3"))
   (make-charset '==ucs-var-002
 		"Abstract glyph-forms corresponding with uXXXX-var-002 of GlyphWiki"
 		'(long-name	"UCS-var-002"
@@ -4765,6 +4852,17 @@
 		  mother	=ucs-var-003
 		  min-code #x20000 max-code #x2FFFF
 		  registry "ucs00\\.var003-2"))
+  (make-charset '=ucs-tip-var-003
+		"uXXXX-var-003 glyph-images in TIP"
+		'(long-name	"UCS-TIP-var-003"
+		  chars		256
+		  dimension	2
+		  columns	2
+		  graphic	2
+		  direction	l2r
+		  mother	=ucs-var-003
+		  min-code #x30000 max-code #x3FFFF
+		  registry "ucs00\\.var003-3"))
   (make-charset '=+>ucs-var-003
 		"uXXXX-var-003's unified glyphs of GlyphWiki"
 		'(long-name	"UCS-var-003 unified glyphs"
@@ -4788,6 +4886,17 @@
 		  min-code #x2E00
 		  max-code #x9FCC
 		  registry "ucs\\.var003-0"))
+  (make-charset '=+>ucs-tip-var-003
+		"uXXXX-var-003 unified glyphs in TIP"
+		'(long-name	"UCS-TIP-var-003 unified glyphs"
+		  chars		256
+		  dimension	2
+		  columns	2
+		  graphic	2
+		  direction	l2r
+		  mother	=+>ucs-var-003
+		  min-code #x30000 max-code #x3FFFF
+		  registry "ucs00\\.var003-3"))
 
   (make-charset '=ucs-var-004
 		"uXXXX-var-004 glyph-images of GlyphWiki"
@@ -5044,6 +5153,17 @@
 		  mother	=>ucs-itaiji-001
 		  min-code #x20000 max-code #x2FFFF
 		  registry "ucs00\\.itaiji001-2"))
+  (make-charset '=>ucs-tip-itaiji-001
+		"uXXXX-itaiji-001 characters in TIP"
+		'(long-name	"UCS-TIP-itaiji-001"
+		  chars		256
+		  dimension	2
+		  columns	2
+		  graphic	2
+		  direction	l2r
+		  mother	=>ucs-itaiji-001
+		  min-code #x30000 max-code #x3FFFF
+		  registry "ucs00\\.itaiji001-3"))
   (make-charset '==ucs-itaiji-001
 		"Abstract glyph-forms corresponding with uXXXX-itaiji-001 of GlyphWiki"
 		'(long-name	"UCS-itaiji-001"
@@ -5238,6 +5358,17 @@
 		  min-code #x2E00
 		  max-code #x9FCC
 		  registry "ucs\\.itaiji002-0"))
+  (make-charset '=>ucs-sip-itaiji-002@iwds-1
+		"IWDS-1 abstract characters of uXXXX-itaiji-002 in SIP"
+		'(long-name	"=>ucs-itaiji-002@iwds-1 in SIP"
+		  chars		256
+		  dimension	2
+		  columns	2
+		  graphic	2
+		  direction	l2r
+		  mother	=>ucs-itaiji-002@iwds-1
+		  min-code #x20000 max-code #x2FFFF
+		  registry "ucs00\\.itaiji002-2"))
 
   (make-charset '=ucs-itaiji-003
 		"uXXXX-itaiji-003 glyphs of GlyphWiki"
@@ -5341,6 +5472,29 @@
 		  mother	==ucs-itaiji-003
 		  min-code #x20000 max-code #x2FFFF
 		  registry "ucs00\\.itaiji003-2"))
+  (make-charset '=>ucs-itaiji-003@iwds-1
+		"uXXXX-itaiji-003's abstract characters based on IWDS-1"
+		'(long-name	"IWDS-1 abstract characters of 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@iwds-1
+		"IWDS-1 abstract characters of UCS-itaiji-003 in BMP"
+		'(long-name	"=>ucs-itaiji-003@iwds-1 in BMP"
+		  chars		256
+		  dimension	2
+		  columns	2
+		  graphic	2
+		  direction	l2r
+                  ;; =>iso-ir	177
+		  mother	=>ucs-itaiji-003@iwds-1
+		  min-code #x2E00
+		  max-code #x9FCC
+		  registry "ucs\\.itaiji003-0"))
 
   (make-charset '=ucs-itaiji-004
 		"uXXXX-itaiji-004 glyphs of GlyphWiki"
@@ -6061,7 +6215,7 @@
 	       registry "-ja-.*-ucs-0"
 	       mother =ucs@JP/hanazono
 	       min-code #x2E00
-               max-code #x9FEA
+               max-code #x9FFC
 	       ;; max-code #xA4CF
 	       ))
   (make-charset