(=jis-x0213-1-2000): Rename `japanese-jisx0208-1990' to

`=jis-x0208-1990'.
(japanese-jisx0208-1990): New alias for `=jis-x0208-1990' when
`utf-2000' is provided.

diff --git a/lisp/mule/mule-conf.el b/lisp/mule/mule-conf.el
index 520cd1a..9beb33c 100644 (file)
--- a/lisp/mule/mule-conf.el
+++ b/lisp/mule/mule-conf.el
@@ -106,7 +106,7 @@
        '(registry "jisx0213\\(\\.2000\\)-1"
                  dimension 2
                  chars 94
-                 mother japanese-jisx0208-1990
+                 mother =jis-x0208-1990
                  final ?O
                  graphic 0))
       (make-charset
@@ -139,6 +139,7 @@
   )
 
 (when (featurep 'utf-2000)
+  (define-charset-alias 'japanese-jisx0208-1990 '=jis-x0208-1990)
   (make-charset 'ucs-gb
                "UCS for GB"
                `(long-name     "ISO/IEC 10646 for GB"