(reset-language-environment): Make

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

diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el
index 0d81e8412fb4c8766286ac01efb6914098db7a80..469068988f163a564b0711a274c362d5174f3769 100644 (file)
--- 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)