(=>ucs@component): New coded-charset for XEmacs CHISE.

(=>ucs-bmp-cjk@component): Ditto.

diff --git a/lisp/mule/mule-conf.el b/lisp/mule/mule-conf.el
index 2104d50..9ac17cc 100644 (file)
--- a/lisp/mule/mule-conf.el
+++ b/lisp/mule/mule-conf.el
@@ -2957,6 +2957,17 @@
                  graphic       2
                  direction     l2r))
 
+  (make-charset '=>ucs@component
+               "UCS encoding for abstract components of IWDS-1."
+               '(long-name     "UCS for IWDS-1 abstract components"
+                 chars         256
+                 dimension     3
+                 columns       2
+                 graphic       2
+                 direction     l2r
+                 =>iso-ir      177
+                 mother        =ucs))
+
   (make-charset '=>ucs@hanyo-denshi
                "UCS abstract characters based on Han'you-Denshi collection."
                '(long-name     "UCS base characters of Han'you-Denshi"
@@ -3842,6 +3853,21 @@
               ;; max-code #xA4CF
               ))
   (make-charset
+   '=>ucs-bmp-cjk@component
+   "CJK Characters in BMP for IWDS-1 abstract components."
+   '(long-name "CJK in BMP@component"
+              chars 256
+              dimension 2
+              columns 2
+              graphic 2
+              direction l2r
+              registry "-ja-.*-ucs-0"
+              mother =>ucs@component
+              min-code #x2E00
+               max-code #x9FA5
+              ;; max-code #xA4CF
+              ))
+  (make-charset
    '==>ucs-bmp-cjk@bucs
    "CJK Characters in BMP of BUCS"
    '(long-name "BUCS-BMP-CJK"