[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r109855: * eshell/em-unix.el (eshell/
From: |
Michael Albinus |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r109855: * eshell/em-unix.el (eshell/sudo): When we have an ad-hoc |
Date: |
Sun, 02 Sep 2012 11:57:19 +0200 |
User-agent: |
Bazaar (2.5.0) |
------------------------------------------------------------
revno: 109855
committer: Michael Albinus <address@hidden>
branch nick: trunk
timestamp: Sun 2012-09-02 11:57:19 +0200
message:
* eshell/em-unix.el (eshell/sudo): When we have an ad-hoc
remote definition of `default-directory', ensure we can connect.
modified:
lisp/ChangeLog
lisp/eshell/em-unix.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2012-09-02 09:31:45 +0000
+++ b/lisp/ChangeLog 2012-09-02 09:57:19 +0000
@@ -1,3 +1,8 @@
+2012-09-02 Michael Albinus <address@hidden>
+
+ * eshell/em-unix.el (eshell/sudo): When we have an ad-hoc
+ remote definition of `default-directory', ensure we can connect.
+
2012-09-02 Juri Linkov <address@hidden>
Toggle whitespace matching mode with M-s SPC.
=== modified file 'lisp/eshell/em-unix.el'
--- a/lisp/eshell/em-unix.el 2012-07-16 11:42:01 +0000
+++ b/lisp/eshell/em-unix.el 2012-09-02 09:57:19 +0000
@@ -1110,6 +1110,8 @@
(format "%s|sudo:address@hidden:%s"
(substring prefix 0 -1) user host dir)
(format "/sudo:address@hidden:%s" user host dir))))
+ ;; Ensure, that Tramp has connected to that construct already.
+ (file-exists-p default-directory)
(eshell-named-command (car orig-args) (cdr orig-args))))))))
(put 'eshell/sudo 'eshell-no-numeric-conversions t)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r109855: * eshell/em-unix.el (eshell/sudo): When we have an ad-hoc,
Michael Albinus <=