summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorKenichi Handa <handa@m17n.org>2001-01-25 11:48:59 +0000
committerKenichi Handa <handa@m17n.org>2001-01-25 11:48:59 +0000
commit631f62fd3d3b0406fabe47dd7aad987f64694b92 (patch)
treec98cf8353e689f8f4dd765df2bb5ee1245947396 /lisp
parentf8499efbd36df8ffcc57daecb47c70abc8fd0fda (diff)
downloademacs-631f62fd3d3b0406fabe47dd7aad987f64694b92.tar.gz
emacs-631f62fd3d3b0406fabe47dd7aad987f64694b92.tar.bz2
emacs-631f62fd3d3b0406fabe47dd7aad987f64694b92.zip
(reset-language-environment): Make
the priority of coding-category-utf-8 higher than coding-category-binary.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/international/mule-cmds.el16
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)