summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAlex Murray <alex.murray@canonical.com>2019-11-25 22:18:07 +1030
committerRobert Pluim <rpluim@gmail.com>2019-11-26 09:23:45 +0100
commitb006095bc9eb1f963372cf862aa040e9a9d30331 (patch)
tree722d469fd60eb95ad4035758f5a203e8920e5434
parent650a514e996287106f9a9525b6f27068ec2a0cbf (diff)
downloademacs-b006095bc9eb1f963372cf862aa040e9a9d30331.tar.gz
Fix auth-source password lookup
* lisp/net/network-stream.el (network-stream-certificate): Ensure :port is specified as a string to 'auth-source-search' (Bug#38371). Copyright-paperwork-exempt: yes
-rw-r--r--lisp/net/network-stream.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/net/network-stream.el b/lisp/net/network-stream.el
index 1e9317bc18c..b5419f1d573 100644
--- a/lisp/net/network-stream.el
+++ b/lisp/net/network-stream.el
@@ -233,7 +233,7 @@ gnutls-boot (as returned by `gnutls-boot-parameters')."
(ignore-errors
(car (auth-source-search :max 1
:host host
- :port service))))
+ :port (format "%s" service)))))
(key (plist-get auth-info :key))
(cert (plist-get auth-info :cert)))
(and key cert (file-readable-p key) (file-readable-p cert)