aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMichael Albinus2015-12-15 12:05:37 +0100
committerMichael Albinus2015-12-15 12:05:37 +0100
commit3be06984666626341e14db0fa2eef089d2f5de13 (patch)
treeaad8ee151fcf8ea0d2225e1233c58ad9dabc7c3e
parent702434408433a3b04be1a03b10366b4d7191b54e (diff)
downloademacs-3be06984666626341e14db0fa2eef089d2f5de13.tar.gz
emacs-3be06984666626341e14db0fa2eef089d2f5de13.zip
Handle Mac OS X eol encoding in Tramp
* lisp/net/tramp-sh.el (tramp-open-connection-setup-interactive-shell): Handle Mac OS X eol encoding.
-rw-r--r--lisp/net/tramp-sh.el9
1 files changed, 7 insertions, 2 deletions
diff --git a/lisp/net/tramp-sh.el b/lisp/net/tramp-sh.el
index 03492de1149..8e0ef57fd8a 100644
--- a/lisp/net/tramp-sh.el
+++ b/lisp/net/tramp-sh.el
@@ -486,6 +486,7 @@ The string is used in `tramp-methods'.")
486;; Solaris: /usr/xpg4/bin:/usr/ccs/bin:/usr/bin:/opt/SUNWspro/bin 486;; Solaris: /usr/xpg4/bin:/usr/ccs/bin:/usr/bin:/opt/SUNWspro/bin
487;; GNU/Linux (Debian, Suse): /bin:/usr/bin 487;; GNU/Linux (Debian, Suse): /bin:/usr/bin
488;; FreeBSD: /usr/bin:/bin:/usr/sbin:/sbin: - beware trailing ":"! 488;; FreeBSD: /usr/bin:/bin:/usr/sbin:/sbin: - beware trailing ":"!
489;; Darwin: /usr/bin:/bin:/usr/sbin:/sbin
489;; IRIX64: /usr/bin 490;; IRIX64: /usr/bin
490;;;###tramp-autoload 491;;;###tramp-autoload
491(defcustom tramp-remote-path 492(defcustom tramp-remote-path
@@ -4198,8 +4199,12 @@ process to set up. VEC specifies the connection."
4198 (setq cs-encode (cdr cs)) 4199 (setq cs-encode (cdr cs))
4199 (unless cs-decode (setq cs-decode 'undecided)) 4200 (unless cs-decode (setq cs-decode 'undecided))
4200 (unless cs-encode (setq cs-encode 'undecided)) 4201 (unless cs-encode (setq cs-encode 'undecided))
4201 (setq cs-encode (tramp-compat-coding-system-change-eol-conversion 4202 (setq cs-encode
4202 cs-encode 'unix)) 4203 (tramp-compat-coding-system-change-eol-conversion
4204 cs-encode
4205 (if (string-match
4206 "^Darwin" (tramp-get-connection-property vec "uname" ""))
4207 'mac 'unix)))
4203 (tramp-send-command vec "echo foo ; echo bar" t) 4208 (tramp-send-command vec "echo foo ; echo bar" t)
4204 (goto-char (point-min)) 4209 (goto-char (point-min))
4205 (when (search-forward "\r" nil t) 4210 (when (search-forward "\r" nil t)