Function: url-https-proxy-connect

url-https-proxy-connect is a byte-compiled function defined in url-http.el.gz.

Signature

(url-https-proxy-connect CONNECTION)

Source Code

;; Defined in /usr/src/emacs/lisp/url/url-http.el.gz
(defun url-https-proxy-connect (connection)
  (setq url-http-after-change-function #'url-https-proxy-after-change-function)
  (process-send-string
   connection
   (format
    (concat "CONNECT %s:%d HTTP/1.1\r\n"
            "Host: %s\r\n"
            (let ((proxy-auth (let ((url-basic-auth-storage
                                     'url-http-proxy-basic-auth-storage))
                                (url-get-authentication url-http-proxy nil
                                                        'any nil))))
              (and proxy-auth
                   (concat "Proxy-Authorization: " proxy-auth "\r\n")))
            "\r\n")
    (url-host url-current-object)
    (or (url-port url-current-object)
        url-https-default-port)
    (url-host url-current-object))))