From: Kenichi Handa <handa@m17n.org>
Date: Thu, 24 Aug 2000 02:10:05 +0000 (+0000)
Subject: (reset-language-environment): Set default-process-coding-system to
X-Git-Tag: emacs-pretest-21.0.90~2005
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0c47a7c83d6d0ad14e7b2b01e2ae4ec878e21d22;p=emacs.git

(reset-language-environment): Set default-process-coding-system to
'(undecided . iso-latin-1), which makes process I/O almost consistent
with file I/O.  Call this function when mule-cmds.el[c] is loaded.
---

diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el
index 334860b018e..68d456c1f09 100644
--- a/lisp/international/mule-cmds.el
+++ b/lisp/international/mule-cmds.el
@@ -1293,6 +1293,7 @@ The default status is as follows:
 
   (set-default-coding-systems nil)
   (setq default-sendmail-coding-system 'iso-latin-1)
+  (setq default-process-coding-system '(undecided . iso-latin-1))
 
   ;; Don't alter the terminal and keyboard coding systems here.
   ;; The terminal still supports the same coding system
@@ -1303,6 +1304,8 @@ The default status is as follows:
   (setq nonascii-translation-table nil
 	nonascii-insert-offset 0))
 
+(reset-language-environment)
+
 (defun set-display-table-and-terminal-coding-system (language-name)
   "Set up the display table and terminal coding system for LANGUAGE-NAME."
   (let ((coding (get-language-info language-name 'unibyte-display)))