(coded-charset-entity-reference-alist):

- Use `=jis-x0213-1@2000' instead of `japanese-jisx0213-1'
- Use `=jis-x0213-2' instead of `japanese-jisx0213-2'.
- Use `<=>jis-x0208@1997' instead of `=jis-x0208@1997'.
- Add settings for `<=>jis-x0213-1@2000' and `<=>jis-x0213-1@2004'.

diff --git a/lisp/mule/mule-coding.el b/lisp/mule/mule-coding.el
index 11e8710..6737020 100644 (file)
--- a/lisp/mule/mule-coding.el
+++ b/lisp/mule/mule-coding.el
@@ -264,9 +264,12 @@
          ( ideograph-hanziku-2                 "HZK2-" 4 X)
          ( japanese-jisx0208-1990               "J90-" 4 X)
          ( japanese-jisx0208                    "J83-" 4 X)
-         ( japanese-jisx0213-1                  "JX1-" 4 X)
-         ( japanese-jisx0213-2                  "JX2-" 4 X)
+         ( =jis-x0213-1@2000                    "JX1-" 4 X)
+         ( =jis-x0213-2                         "JX2-" 4 X)
          ( =jis-x0213-1@2004                    "JX3-" 4 X)
+         (<=>jis-x0208@1997                     "J97-" 4 X)
+         (<=>jis-x0213-1@2000                 "A-JX1-" 4 X)
+         (<=>jis-x0213-1@2004                 "A-JX3-" 4 X)
          ( japanese-jisx0212                    "JSP-" 4 X)
          ( japanese-jisx0208-1978               "J78-" 4 X)
          ( chinese-cns11643-1                    "C1-" 4 X)
@@ -315,7 +318,6 @@
          ( =ucs@cns                              "CU-" 8 X)
          ( =ucs@ks                               "KU+" 4 X)
          ( =ucs@ks                               "KU-" 8 X)
-         ( =jis-x0208@1997                      "J97-" 4 X)
          ( =jis-x0208@1978/i1                 "J78i1-" 4 X)
          ( =shinjigen@rev                      "SJG2-" 4 d)
          ( =shinjigen@1ed                      "SJG1-" 4 d)