# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 980428052 0
# Node ID 8fcff22c51b74a2d640c05aeb91956df13d39fd1
# Parent  6f60efe86358943527ab6072cc5661deeaaf1e5a
(reset-language-environment): Reset coding-category-utf-8 to
mule-utf-8.

diff -r 6f60efe86358 -r 8fcff22c51b7 lisp/international/mule-cmds.el
--- a/lisp/international/mule-cmds.el	Thu Jan 25 13:03:10 2001 +0000
+++ b/lisp/international/mule-cmds.el	Thu Jan 25 13:07:32 2001 +0000
@@ -1320,10 +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
+	coding-category-utf-8		'mule-utf-8
 "
   (interactive)
   ;; This function formerly set default-enable-multibyte-characters to t,
@@ -1339,12 +1339,11 @@
 	coding-category-raw-text	'raw-text
 	coding-category-sjis		'japanese-shift-jis
 	coding-category-big5		'chinese-big5
-	coding-category-ccl		nil
+	coding-category-utf-16-be       nil
+	coding-category-utf-16-le       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)
 
   (set-coding-priority
    '(coding-category-iso-8-1
@@ -1357,11 +1356,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-16-le
+     coding-category-utf-8))
 
   (update-coding-systems-internal)