Remove superfluous `gnutls-available-p' check

* lisp/url/url-http.el (url-http-parse-headers): `gnutls-available-p' is
now always available.
parent be6dff68
2014-12-12 Lars Magne Ingebrigtsen <larsi@gnus.org>
* url-http.el (url-http-parse-headers): `gnutls-available-p' is
now always available.
2014-12-11 Lars Magne Ingebrigtsen <larsi@gnus.org>
* url-http.el (url-http-parse-headers): Check that
......
......@@ -495,8 +495,7 @@ should be shown to the user."
(url-port url-current-object)
url-http-process)
;; Pass the https certificate on to the caller.
(when (and (fboundp 'gnutls-available-p)
(gnutls-available-p))
(when (gnutls-available-p)
(let ((status (gnutls-peer-status url-http-process)))
(when (or status
(plist-get (car url-callback-arguments) :peer))
......
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