(=ucs-var-001): New coded-charset for XEmacs CHISE.

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

diff --git a/lisp/mule/mule-conf.el b/lisp/mule/mule-conf.el
index 9ac17cc..e377d52 100644 (file)
--- a/lisp/mule/mule-conf.el
+++ b/lisp/mule/mule-conf.el
@@ -832,7 +832,30 @@
              graphic 0
              ;; partial t
              ))
-    (make-charset
+  (make-charset
+   '==jis-x0208@1978/4er
+   "JIS X 0208:1978, replaced by errata of 4th impression."
+   '(registry "jisx0208\\.1978"
+             dimension 2
+             chars 94
+             mother ==jis-x0208@1978/2-pr
+              =>iso-ir 42
+             ;; final ?@
+             graphic 0
+             partial t))
+  (make-charset
+   '==jis-x0208@1978/5pr
+   "JIS X 0208:1978, 5th impression."
+   '(registry "jisx0208\\.1978"
+             dimension 2
+             chars 94
+              ;; mother ==jis-x0208@1978/4-pr
+              mother ==jis-x0208@1978/2-pr
+              =>iso-ir 42
+             ;; final ?@
+             graphic 0
+             partial t))
+  (make-charset
    '==jis-x0208@1983
    "JIS X 0208:1983 abstract glyph-forms."
    '(registry "jisx0208\\.1983"
@@ -3645,6 +3668,75 @@
                  =>iso-ir      177
                  mother        ===ucs@unicode))
 
+  (make-charset '=ucs-var-001
+               "uXXXX-var-001 glyph-images of GlyphWiki"
+               '(long-name     "UCS-var-001"
+                 chars         256
+                 dimension     3
+                 columns       2
+                 graphic       2
+                 direction     l2r
+                  ;; =>iso-ir  177
+                 mother        =ucs))
+  (make-charset '=ucs-bmp-var-001
+               "uXXXX-var-001 glyph-images in BMP"
+               '(long-name     "UCS-BMP-var-001"
+                 chars         256
+                 dimension     2
+                 columns       2
+                 graphic       2
+                 direction     l2r
+                  ;; =>iso-ir  177
+                 mother        =ucs-var-001
+                 min-code #x2E00
+                 max-code #x9FA5
+                 registry "ucs\\.var001-0"))
+  (make-charset '=ucs-var-002
+               "uXXXX-var-002 glyph-images of GlyphWiki"
+               '(long-name     "UCS-var-002"
+                 chars         256
+                 dimension     3
+                 columns       2
+                 graphic       2
+                 direction     l2r
+                  ;; =>iso-ir  177
+                 mother        =ucs))
+  (make-charset '=ucs-bmp-var-002
+               "uXXXX-var-002 glyph-images in BMP"
+               '(long-name     "UCS-BMP-var-002"
+                 chars         256
+                 dimension     2
+                 columns       2
+                 graphic       2
+                 direction     l2r
+                  ;; =>iso-ir  177
+                 mother        =ucs-var-002
+                 min-code #x2E00
+                 max-code #x9FA5
+                 registry "ucs\\.var002-0"))
+  (make-charset '=ucs-var-003
+               "uXXXX-var-003 glyph-images of GlyphWiki"
+               '(long-name     "UCS-var-003"
+                 chars         256
+                 dimension     3
+                 columns       2
+                 graphic       2
+                 direction     l2r
+                  ;; =>iso-ir  177
+                 mother        =ucs))
+  (make-charset '=ucs-bmp-var-003
+               "uXXXX-var-003 glyph-images in BMP"
+               '(long-name     "UCS-BMP-var-003"
+                 chars         256
+                 dimension     2
+                 columns       2
+                 graphic       2
+                 direction     l2r
+                  ;; =>iso-ir  177
+                 mother        =ucs-var-003
+                 min-code #x2E00
+                 max-code #x9FA5
+                 registry "ucs\\.var003-0"))
   (make-charset '=ucs-itaiji-084
                "uXXXX-itaiji-084 glyph-images of GlyphWiki"
                '(long-name     "UCS-itaiji-084"