(=jis-x0208@1978/2-pr): New coded-charset for XEmacs CHISE.

(=jis-x0208@1978/4er): New coded-charset for XEmacs CHISE.
(=jis-x0208@1978/4-pr): Use `=jis-x0208@1978/2-pr' instead of
`=jis-x0208@1978/1er-pr' as the mother.
(=jis-x0208@1978/5pr): New coded-charset for XEmacs CHISE.

diff --git a/lisp/mule/mule-conf.el b/lisp/mule/mule-conf.el
index 0e30a04..3daff0a 100644 (file)
--- a/lisp/mule/mule-conf.el
+++ b/lisp/mule/mule-conf.el
@@ -83,12 +83,45 @@
              graphic 0
              partial t))
   (make-charset
+   '=jis-x0208@1978/2-pr
+   "JIS X 0208:1978, 2nd impression or later."
+   '(registry "jisx0208\\.1978"
+             dimension 2
+             chars 94
+             mother =jis-x0208@1978/1er-pr
+              =>iso-ir 42
+             ;; final ?@
+             graphic 0
+             partial t))
+  (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/4-pr
    "JIS X 0208:1978, 4th impression or later."
    '(registry "jisx0208\\.1978"
              dimension 2
              chars 94
-             mother =jis-x0208@1978/1er-pr
+             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
               =>iso-ir 42
              ;; final ?@
              graphic 0