# HG changeset patch # User Kenichi Handa # Date 1051521379 0 # Node ID 9e0c5cef06ef3dab1dfcb1739158936481256eb3 # Parent 3ec397b863e07baf640b892dba578797761b21a9 (reset-language-environment): Raise the priority of mule-utf-8, mule-utf-16-be-with-signature and mule-utf-16-le.-with-signature. diff -r 3ec397b863e0 -r 9e0c5cef06ef lisp/international/mule-cmds.el --- a/lisp/international/mule-cmds.el Sun Apr 27 11:24:59 2003 +0000 +++ b/lisp/international/mule-cmds.el Mon Apr 28 09:16:19 2003 +0000 @@ -1585,8 +1585,11 @@ bound to each category are as follows coding category coding system -------------------------------------------------- + coding-category-iso-8-1 iso-latin-1 coding-category-iso-8-2 iso-latin-1 - coding-category-iso-8-1 iso-latin-1 + coding-category-utf-8 mule-utf-8 + coding-category-utf-16-be mule-utf-16-be-with-signature + coding-category-utf-16-le mule-utf-16-le-with-signature coding-category-iso-7-tight iso-2022-jp coding-category-iso-7 iso-2022-7bit coding-category-iso-7-else iso-2022-7bit-lock @@ -1596,10 +1599,7 @@ coding-category-sjis japanese-shift-jis coding-category-big5 chinese-big5 coding-category-ccl nil - coding-category-binary no-conversion - coding-category-utf-16-be nil - coding-category-utf-16-le nil - coding-category-utf-8 mule-utf-8" + coding-category-binary no-conversion" (interactive) ;; This function formerly set default-enable-multibyte-characters to t, ;; but that is incorrect. It should not alter the unibyte/multibyte choice. @@ -1614,8 +1614,8 @@ coding-category-raw-text 'raw-text coding-category-sjis 'japanese-shift-jis coding-category-big5 'chinese-big5 - coding-category-utf-16-be nil - coding-category-utf-16-le nil + coding-category-utf-16-be 'mule-utf-16-be-with-signature + coding-category-utf-16-le 'mule-utf-16-le-with-signature coding-category-utf-8 'mule-utf-8 coding-category-ccl nil coding-category-binary 'no-conversion) @@ -1623,6 +1623,9 @@ (set-coding-priority '(coding-category-iso-8-1 coding-category-iso-8-2 + coding-category-utf-8 + coding-category-utf-16-be + coding-category-utf-16-le coding-category-iso-7-tight coding-category-iso-7 coding-category-iso-7-else @@ -1632,10 +1635,7 @@ coding-category-sjis coding-category-big5 coding-category-ccl - coding-category-binary - coding-category-utf-16-be - coding-category-utf-16-le - coding-category-utf-8)) + coding-category-binary)) (update-coding-systems-internal)