[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/emacs-23 r100116: * net/tramp.el (tramp-ope
From: |
Michael Albinus |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/emacs-23 r100116: * net/tramp.el (tramp-open-connection-setup-interactive-shell): |
Date: |
Fri, 15 Oct 2010 14:15:43 +0200 |
User-agent: |
Bazaar (2.0.3) |
------------------------------------------------------------
revno: 100116
committer: Michael Albinus <address@hidden>
branch nick: emacs-23
timestamp: Fri 2010-10-15 14:15:43 +0200
message:
* net/tramp.el (tramp-open-connection-setup-interactive-shell):
Suppress expansion of tabs to spaces.
modified:
lisp/ChangeLog
lisp/net/tramp.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2010-10-15 00:41:53 +0000
+++ b/lisp/ChangeLog 2010-10-15 12:15:43 +0000
@@ -1,3 +1,8 @@
+2010-10-15 Michael Albinus <address@hidden>
+
+ * net/tramp.el (tramp-open-connection-setup-interactive-shell):
+ Suppress expansion of tabs to spaces.
+
2010-10-15 Kenichi Handa <address@hidden>
* international/characters.el: Add category '|' (word breakable)
=== modified file 'lisp/net/tramp.el'
--- a/lisp/net/tramp.el 2010-08-26 19:23:02 +0000
+++ b/lisp/net/tramp.el 2010-10-15 12:15:43 +0000
@@ -7013,9 +7013,7 @@
;; because we're running on a non-MULE Emacs. Let's try
;; stty, instead.
(tramp-send-command vec "stty -onlcr" t))))
- ;; Dump stty settings in the traces.
- (when (>= tramp-verbose 9)
- (tramp-send-command vec "stty -a" t))
+
(tramp-send-command vec "set +o vi +o emacs" t)
;; Check whether the output of "uname -sr" has been changed. If
@@ -7086,11 +7084,20 @@
(when (string-match "^IRIX64" (tramp-get-connection-property vec "uname" ""))
(tramp-send-command vec "set +H" t))
+ ;; On BSD-like systems, ?\t is expanded to spaces. Suppress this.
+ (when (string-match "BSD\\|Darwin"
+ (tramp-get-connection-property vec "uname" ""))
+ (tramp-send-command vec "stty -oxtabs" t))
+
;; Set `remote-tty' process property.
(ignore-errors
(let ((tty (tramp-send-command-and-read vec "echo \\\"`tty`\\\"")))
(unless (zerop (length tty)) (process-put proc 'remote-tty tty))))
+ ;; Dump stty settings in the traces.
+ (when (>= tramp-verbose 9)
+ (tramp-send-command vec "stty -a" t))
+
;; Set the environment.
(tramp-message vec 5 "Setting default environment")
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/emacs-23 r100116: * net/tramp.el (tramp-open-connection-setup-interactive-shell):,
Michael Albinus <=