diff --git a/lisp/url/url-http.el b/lisp/url/url-http.el
index 7f21a38..4ee9377 100644
--- a/lisp/url/url-http.el
+++ b/lisp/url/url-http.el
@@ -895,6 +895,8 @@ should be shown to the user."
                (let ((url-request-method url-http-method)
                      (url-request-extra-headers url-http-extra-headers)
                      (url-request-data url-http-data))
+                 (if (string= "https" (url-type url-current-object))
+                     (setq url-gateway-method 'tls))
                  (url-http url-current-object url-callback-function
                            url-callback-arguments (current-buffer)))))
 	    ((url-http-parse-headers)