update.

[chise/xemacs-chise.git] / lisp / mule / mule-conf.el

diff --git a/lisp/mule/mule-conf.el b/lisp/mule/mule-conf.el
index a4dd505..83bf4c6 100644 (file)
--- a/lisp/mule/mule-conf.el
+++ b/lisp/mule/mule-conf.el
@@ -2526,6 +2526,16 @@
               registry "\\(GTKpj-1\\|jisx0208\\.GTK-1\\)$"))
   (define-charset-alias 'ideograph-gt-pj-k1 '=gt-pj-k1)
   (make-charset
+   '==gt-pj-k1
+   "Ideographic parts of GT (pseudo JIS encoding) part 1"
+   '(long-name "GT K1"
+              chars 94
+              dimension 2
+              columns 2
+              graphic 0
+              direction l2r
+              registry "\\(GTKpj-1\\|jisx0208\\.GTK-1\\)$"))
+  (make-charset
    '=gt-pj-k2
    "Ideographic parts of GT (pseudo JIS encoding) part 2"
    '(long-name "GT K2"
@@ -2536,6 +2546,16 @@
               direction l2r
               registry "\\(GTKpj-2\\|jisx0208\\.GTK-2\\)$"))
   (define-charset-alias 'ideograph-gt-pj-k2 '=gt-pj-k2)
+  (make-charset
+   '==gt-pj-k2
+   "Ideographic parts of GT (pseudo JIS encoding) part 2"
+   '(long-name "GT K2"
+              chars 94
+              dimension 2
+              columns 2
+              graphic 0
+              direction l2r
+              registry "\\(GTKpj-2\\|jisx0208\\.GTK-2\\)$"))
 
   (make-charset '=daikanwa
                "Daikanwa dictionary (unchanged part)"
@@ -4725,6 +4745,7 @@
                  min-code #x2E00
                  max-code #x9FCC
                  registry "ucs\\.itaiji004-0"))
+
   (make-charset '=ucs-itaiji-005
                "uXXXX-itaiji-005 glyphs of GlyphWiki"
                '(long-name     "UCS-itaiji-005"
@@ -4771,6 +4792,30 @@
                  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"
                '(long-name     "UCS-itaiji-006"
@@ -4794,6 +4839,54 @@
                  min-code #x2E00
                  max-code #x9FCC
                  registry "ucs\\.itaiji006-0"))
+  (make-charset '=>ucs-itaiji-006
+               "Abstract characters corresponding with uXXXX-itaiji-006 of GlyphWiki"
+               '(long-name     "UCS-itaiji-006"
+                 chars         256
+                 dimension     3
+                 columns       2
+                 graphic       2
+                 direction     l2r
+                  ;; =>iso-ir  177
+                 mother        =ucs-itaiji-006))
+  (make-charset '=>ucs-bmp-itaiji-006
+               "uXXXX-itaiji-006's abstract characters in BMP"
+               '(long-name     "UCS-BMP-itaiji-006 characters"
+                 chars         256
+                 dimension     2
+                 columns       2
+                 graphic       2
+                 direction     l2r
+                  ;; =>iso-ir  177
+                 mother        =>ucs-itaiji-006
+                 min-code #x2E00
+                 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"
@@ -5236,6 +5329,19 @@
               min-code #x20000 max-code #x2FFFF
               code-offset #x20000))
   (make-charset
+   '=>ucs-sip@component
+   "CJK Characters in SIP for IWDS-1 abstract components."
+   '(long-name "CJK in SIP@component"
+              chars 256
+              dimension 2
+              columns 2
+              graphic 2
+              direction l2r
+              registry "ucs00-2$"
+              mother =>ucs@component
+              min-code #x20000 max-code #x2FFFF
+              code-offset #x20000))
+  (make-charset
    '==ucs-sip@JP/hanazono
    "Hanazono glyphs-forms of UCS SIP"
    '(long-name "Hanazono SIP glyph-forms"