(coded-charset-entity-reference-alist): Prefer `=gt-k' to

`=ucs-var-*', `=ucs-itaiji-*', `=big5-cdp-var-*', `=big5-cdp-itaiji-*'
and `=jis-x0208@1978/1pr'.

diff --git a/lisp/mule/mule-coding.el b/lisp/mule/mule-coding.el
index ba9e15e..a13c876 100644 (file)
--- a/lisp/mule/mule-coding.el
+++ b/lisp/mule/mule-coding.el
@@ -358,6 +358,7 @@
          ( =iso-ir165                           "EGB-" 4 X)
          ( =jis-x0208@1983                      "J83-" 4 X)
          ( =koseki                           "KOSEKI-" 6 d)
+         ( =gt-k                                "GT-K" 5 d)
          ( =ucs-var-001                      "U-v001+" 4 X)
          ( =ucs-var-002                      "U-v002+" 4 X)
          ( =ucs-var-003                      "U-v003+" 4 X)
@@ -397,7 +398,6 @@
          ( =big5-cdp-itaiji-004            "CDP-i004-" 4 X)
          ( =big5-cdp-itaiji-005            "CDP-i005-" 4 X)
          ( =jis-x0208@1978/1pr                  "J78-" 4 X)
-         ( =gt-k                                "GT-K" 5 d)
          (==jis-x0208@1983                   "g2-J83-" 4 X)
          (==koseki                        "g2-KOSEKI-" 6 d)
          (==ucs-var-001                   "g2-U-v001+" 4 X)