From c7c936717d0b50b22d5e91d13f68f350e6bfe959 Mon Sep 17 00:00:00 2001 From: Augusto Stoffel Date: Tue, 5 Nov 2024 15:07:27 +0100 Subject: [PATCH] Handle ':noquery' in 'open-gnutls-stream' * lisp/net/gnutls.el (open-gnutls-stream): Extract and use ':noquery' keyword. (Bug#74193). (cherry picked from commit ec39f669f902143a68a99fb42dd05716a27736be) --- lisp/net/gnutls.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/net/gnutls.el b/lisp/net/gnutls.el index b5fb4d47d57..2261ccc7e30 100644 --- a/lisp/net/gnutls.el +++ b/lisp/net/gnutls.el @@ -166,7 +166,7 @@ Third arg HOST is the name of the host to connect to, or its IP address. Fourth arg SERVICE is the name of the service desired, or an integer specifying a port number to connect to. Fifth arg PARAMETERS is an optional list of keyword/value pairs. -Only :client-certificate, :nowait, and :coding keywords are +Only :client-certificate, :nowait, :noquery, and :coding keywords are recognized, and have the same meaning as for `open-network-stream'. For historical reasons PARAMETERS can also be a symbol, which is @@ -197,9 +197,11 @@ trust and key files, and priority string." (cert (network-stream-certificate host service parameters)) (keylist (and cert (list cert))) (nowait (plist-get parameters :nowait)) + (noquery (plist-get parameters :noquery)) (process (open-network-stream name buffer host service :nowait nowait + :noquery noquery :tls-parameters (and nowait (cons 'gnutls-x509pki -- 2.39.5