changeset 31138:5dab940bf298

(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.
author Kenichi Handa <handa@m17n.org>
date Thu, 24 Aug 2000 02:10:05 +0000
parents b436ef5ec659
children ca63a2c1a83b
files lisp/international/mule-cmds.el
diffstat 1 files changed, 3 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/international/mule-cmds.el	Thu Aug 24 02:09:20 2000 +0000
+++ b/lisp/international/mule-cmds.el	Thu Aug 24 02:10:05 2000 +0000
@@ -1293,6 +1293,7 @@
 
   (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 @@
   (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)))