From b006095bc9eb1f963372cf862aa040e9a9d30331 Mon Sep 17 00:00:00 2001 From: Alex Murray Date: Mon, 25 Nov 2019 22:18:07 +1030 Subject: [PATCH] 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 --- lisp/net/network-stream.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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) -- 2.39.5