Commit eb8c9362 authored by Lars Magne Ingebrigtsen's avatar Lars Magne Ingebrigtsen
Browse files

(network-stream-certificate): Change cert-cert to cert and cert-key to key.

parent 6a6e4d93
......@@ -5,6 +5,8 @@
STARTTLS.
(auth-source): Require.
(open-network-stream): Document the :client-certificate keyword.
(network-stream-certificate): Change cert-cert to cert and
cert-key to key.
2011-06-21 Michael Albinus <michael.albinus@gmx.de>
......
......@@ -171,8 +171,8 @@ values:
(car (auth-source-search :max 1
:host host
:port service)))
(key (plist-get auth-info :cert-key))
(cert (plist-get auth-info :cert-cert)))
(key (plist-get auth-info :key))
(cert (plist-get auth-info :cert)))
(and key cert
(list key cert)))))))
......@@ -231,8 +231,8 @@ values:
;; the command line.
(when cert
(setq starttls-extra-arguments
(nconc (list "--x509keyfile" (nth 0 cert)
"--x509certfile" (nth 1 cert))
(nconc (list "--x509keyfile" (expand-file-name (nth 0 cert))
"--x509certfile" (expand-file-name (nth 1 cert)))
starttls-extra-arguments)))
(setq stream (starttls-open-stream name buffer host service)))
(network-stream-get-response stream start eoc))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment