diff options
Diffstat (limited to 'lisp/url/url-http.el')
| -rw-r--r-- | lisp/url/url-http.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/url/url-http.el b/lisp/url/url-http.el index 34d325acf56..33e333d8e8c 100644 --- a/lisp/url/url-http.el +++ b/lisp/url/url-http.el @@ -495,7 +495,8 @@ should be shown to the user." (url-port url-current-object) url-http-process) ;; Pass the https certificate on to the caller. - (when (gnutls-available-p) + (when (and (fboundp 'gnutls-available-p) + (gnutls-available-p)) (let ((status (gnutls-peer-status url-http-process))) (when (or status (plist-get (car url-callback-arguments) :peer)) |