[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master f5543ff: Improve result of `auth-source-search' in
From: |
Michael Albinus |
Subject: |
[Emacs-diffs] master f5543ff: Improve result of `auth-source-search' in Tramp |
Date: |
Fri, 28 Oct 2016 15:08:25 +0000 (UTC) |
branch: master
commit f5543ffcf5b2974fa8fc6cf007e9109fa8e9051e
Author: Michael Albinus <address@hidden>
Commit: Michael Albinus <address@hidden>
Improve result of `auth-source-search' in Tramp
* lisp/net/tramp.el (tramp-read-passwd): Require :secret and
:user in result of `auth-source-search'.
---
lisp/net/tramp.el | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el
index 730972e..e03b614 100644
--- a/lisp/net/tramp.el
+++ b/lisp/net/tramp.el
@@ -4160,7 +4160,10 @@ Invokes `password-read' if available, `read-passwd'
else."
:max 1
:user (or tramp-current-user t)
:host tramp-current-host
- :port tramp-current-method)
+ :port tramp-current-method
+ :require
+ (cons
+ :secret (and tramp-current-user '(:user))))
auth-passwd (plist-get
(nth 0 auth-info) :secret)
auth-passwd (if (functionp auth-passwd)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master f5543ff: Improve result of `auth-source-search' in Tramp,
Michael Albinus <=