(coded-charset-entity-reference-alist): Add settings for

`=>>big5-cdp', `=>>gt-k', `=>>ucs@jis' and `=>>ucs@cns'.

diff --git a/lisp/mule/mule-coding.el b/lisp/mule/mule-coding.el
index 76e0097..1c0df9c 100644 (file)
--- a/lisp/mule/mule-coding.el
+++ b/lisp/mule/mule-coding.el
@@ -249,9 +249,11 @@
          ( =zinbun-oracle                       "ZOB-" 4 d)
          (=>zinbun-oracle                     "A-ZOB-" 4 d)
          ( =ruimoku-v6                         "RUI6-" 4 X)
-         ( chinese-big5-cdp                     "CDP-" 4 X)
+         ( =big5-cdp                            "CDP-" 4 X)
+         (=>>big5-cdp                         "G-CDP-" 4 X)
          ( ideograph-daikanwa                     "M-" 5 d)
          ( =gt-k                                "GT-K" 5 d)
+         (=>>gt-k                             "G-GT-K" 5 d)
          ( ideograph-cbeta                        "CB" 5 d)
          ( ideograph-hanziku-1                "HZK01-" 4 X)
          ( ideograph-hanziku-2                "HZK02-" 4 X)
@@ -323,19 +325,21 @@
          ( china3-jef                           "JC3-" 4 X)
          ( chinese-big5                           "B-" 4 X)
          ( chinese-big5                          "C0-" 4 X)
-         ( =ucs@iso                               "U-" 8 X)
-         ( =ucs@unicode                          "UU+" 4 X)
-         ( =ucs@unicode                          "UU-" 8 X)
-         ( =ucs@iso                               "U+" 4 X)
-         ( =ucs@gb                               "GU+" 4 X)
-         ( =ucs@gb                               "GU-" 8 X)
-         ( =ucs@jis                              "JU+" 4 X)
-         ( =ucs@jis                              "JU-" 8 X)
-         ( =ucs@cns                              "CU+" 4 X)
-         ( =ucs@cns                              "CU-" 8 X)
-         ( =ucs@ks                               "KU+" 4 X)
-         ( =ucs@ks                               "KU-" 8 X)
+         ( =ucs@iso                               "U-" 8 X)
+         ( =ucs@unicode                          "UU+" 4 X)
+         ( =ucs@unicode                          "UU-" 8 X)
+         ( =ucs@iso                               "U+" 4 X)
+         ( =ucs@gb                               "GU+" 4 X)
+         ( =ucs@gb                               "GU-" 8 X)
+         ( =ucs@jis                              "JU+" 4 X)
+         ( =ucs@jis                              "JU-" 8 X)
+         ( =ucs@cns                              "CU+" 4 X)
+         ( =ucs@cns                              "CU-" 8 X)
+         ( =ucs@ks                               "KU+" 4 X)
+         ( =ucs@ks                               "KU-" 8 X)
          (=>>ucs@unicode                       "G-UU+" 4 X)
+         (=>>ucs@jis                           "G-JU+" 4 X)
+         (=>>ucs@cns                           "G-CU+" 4 X)
          ( =jis-x0208@1978/i1                 "J78i1-" 4 X)
          ( =shinjigen@rev                      "SJG2-" 4 d)
          ( =shinjigen@1ed                      "SJG1-" 4 d)