From: Kenichi Handa <handa@m17n.org>
Date: Thu, 2 Jul 2009 06:44:06 +0000 (+0000)
Subject: (set-keyboard-coding-system): Force *-unix
X-Git-Tag: emacs-pretest-23.1.90~2345
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=af0403e0d4126d5920f4fe4d000edbc2fae689fc;p=emacs.git

(set-keyboard-coding-system): Force *-unix
coding-system to avoid eol conversion.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 068e8532dc5..2efcf47f1eb 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2009-07-02  Kenichi Handa  <handa@m17n.org>
+
+	* international/mule.el (set-keyboard-coding-system): Force *-unix
+	coding-system to avoid eol conversion.
+
 2009-07-01  Michael Albinus  <michael.albinus@gmx.de>
 
 	* net/tramp-gvfs.el (tramp-gvfs-file-name-handler-alist): Add
diff --git a/lisp/international/mule.el b/lisp/international/mule.el
index ebbc86a62ff..cd0f127a025 100644
--- a/lisp/international/mule.el
+++ b/lisp/international/mule.el
@@ -1310,7 +1310,10 @@ graphical terminals."
 					'keyboard-coding-saved-meta-mode
 					(cons (nth 2 (current-input-mode))
 					      nil)))
-	    (set-input-meta-mode 8)))
+	    (set-input-meta-mode 8))
+	  ;; Avoid end-of-line conversion.
+	  (setq coding-system
+		(coding-system-change-eol-conversion coding-system 'unix)))
 
       (when saved-meta-mode
 	(set-input-meta-mode (car saved-meta-mode))