(reset-language-environment): Make

the priority of coding-category-utf-8 higher than
coding-category-binary.

1 files changed, 10 insertions, 6 deletions

diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el
index 0d81e8412fb..469068988f1 100644
--- a/lisp/international/mule-cmds.el
+++ b/lisp/international/mule-cmds.el
@@ -1320,7 +1320,10 @@ The default status is as follows:
         coding-category-sjis            japanese-shift-jis
         coding-category-big5            chinese-big5
         coding-category-ccl             nil
+        coding-category-utf-8           'mule-utf-8
         coding-category-binary          no-conversion
+        coding-category-utf-16-be       nil
+        coding-category-utf-16-le       nil
 "
   (interactive)
   ;; This function formerly set default-enable-multibyte-characters to t,
@@ -1336,11 +1339,12 @@ The default status is as follows:
         coding-category-raw-text        'raw-text
         coding-category-sjis            'japanese-shift-jis
         coding-category-big5            'chinese-big5
-        coding-category-utf-8           nil
-        coding-category-utf-16-be       nil
-        coding-category-utf-16-le       nil
         coding-category-ccl             nil
-        coding-category-binary          'no-conversion)
+        coding-category-utf-8           'mule-utf-8
+        coding-category-binary          'no-conversion
+        coding-category-utf-16-be       nil
+        coding-category-utf-16-le       nil)
+
 
   (set-coding-priority
    '(coding-category-iso-8-1
@@ -1353,11 +1357,11 @@ The default status is as follows:
      coding-category-raw-text
      coding-category-sjis
      coding-category-big5
+     coding-category-utf-8
      coding-category-ccl
      coding-category-binary
      coding-category-utf-16-be
-     coding-category-utf-16-le
-     coding-category-utf-8))
+     coding-category-utf-16-le))
 
   (update-coding-systems-internal)