Fix bug #8122 with decoding keyboard input.

 lisp/international/mule-cmds.el (set-default-coding-systems): Use
 the -unix variant of encoding in default-keyboard-coding-system.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index bd1f4e7b3c984ed5d6c894fba546d9571b505a4c..a11cb79364806eb6f235ebd7077356b88d7b8793 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2011-02-26  Eli Zaretskii  <eliz@gnu.org>
+
+       * international/mule-cmds.el (set-default-coding-systems): Use the
+       -unix variant of encoding in default-keyboard-coding-system.
+       (Bug#8122)
+
 2011-02-23  Kenichi Handa  <handa@m17n.org>
 
        * mail/rmailmm.el (rmail-mime-process-multipart): Do not signal an

diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el
index 0ca4a7405862ccec29c0209e546dfcfc3af45388..29b2218ae548a160c5faef1ddb0b37130b783067 100644 (file)
--- a/lisp/international/mule-cmds.el
+++ b/lisp/international/mule-cmds.el
@@ -368,7 +368,9 @@ This also sets the following values:
                 (coding-system-get coding-system 'ascii-compatible-p)))
        (setq default-file-name-coding-system coding-system)))
   (setq default-terminal-coding-system coding-system)
-  (setq default-keyboard-coding-system coding-system)
+  ;; Prevent default-terminal-coding-system from converting ^M to ^J.
+  (setq default-keyboard-coding-system
+       (coding-system-change-eol-conversion coding-system 'unix))
   ;; Preserve eol-type from existing default-process-coding-systems.
   ;; On non-unix-like systems in particular, these may have been set
   ;; carefully by the user, or by the startup code, to deal with the