Mercurial > emacs

changeset 35540:18667fa78087

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(reset-language-environment): Make the priority of coding-category-utf-8 higher than coding-category-binary.
author Kenichi Handa <handa@m17n.org>
date Thu, 25 Jan 2001 11:48:59 +0000
parents 57b31206dbfa
children b671f9509b3b
files lisp/international/mule-cmds.el
diffstat 1 files changed, 10 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/international/mule-cmds.el	Thu Jan 25 11:48:42 2001 +0000
+++ b/lisp/international/mule-cmds.el	Thu Jan 25 11:48:59 2001 +0000
@@ -1320,7 +1320,10 @@
 	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 @@
 	coding-category-raw-text	'raw-text
 	coding-category-sjis		'japanese-shift-jis
 	coding-category-big5		'chinese-big5
-	coding-category-utf-8           nil
+	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
-	coding-category-ccl		nil
-	coding-category-binary		'no-conversion)
+	coding-category-utf-16-le       nil)
+
 
   (set-coding-priority
    '(coding-category-iso-8-1
@@ -1353,11 +1357,11 @@
      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)