procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Improve result of `auth-source-search' in Tramp

Browse source 
* lisp/net/tramp.el (tramp-read-passwd): Require :secret and
:user in result of `auth-source-search'.
This commit is contained in:
Michael Albinus 2016-10-28 17:08:14 +02:00
parent e2fd20683a
commit f5543ffcf5
1 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/net/tramp.el
View file

@ -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)