From 355204ddd5525864764003675651cc17ad3280eb Mon Sep 17 00:00:00 2001 From: Michael Albinus Date: Sat, 16 Nov 2013 12:37:45 +0100 Subject: [PATCH] * net/tramp-cmds.el (tramp-cleanup-connection): Clean up `tramp-current-connection'. --- lisp/ChangeLog | 5 +++++ lisp/net/tramp-cmds.el | 4 ++++ 2 files changed, 9 insertions(+) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index aabdbd6b0fc..ce887ff3e11 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2013-11-16 Michael Albinus + + * net/tramp-cmds.el (tramp-cleanup-connection): Clean up + `tramp-current-connection'. + 2013-11-15 Dmitry Gutov * progmodes/ruby-mode.el (ruby-font-lock-keywords): End regexp for diff --git a/lisp/net/tramp-cmds.el b/lisp/net/tramp-cmds.el index 2f3dfa4fd7a..35f23caa51a 100644 --- a/lisp/net/tramp-cmds.el +++ b/lisp/net/tramp-cmds.el @@ -85,6 +85,10 @@ When called interactively, a Tramp connection has to be selected." ;; Nothing to do. (message "No Tramp connection found.") + ;; Cleanup `tramp-current-connection'. Otherwise, we would be + ;; suppressed in the test suite. + (setq tramp-current-connection nil) + ;; Flush password cache. (unless keep-password (tramp-clear-passwd vec)) -- 2.11.4.GIT