diff --git a/racket/collects/net/http-client.rkt b/racket/collects/net/http-client.rkt index d54064a8d5..7d661c8b82 100644 --- a/racket/collects/net/http-client.rkt +++ b/racket/collects/net/http-client.rkt @@ -55,7 +55,7 @@ (define (http-conn-open! hc host-bs #:ssl? [ssl? #f] #:port [port (if ssl? 443 80)]) (http-conn-close! hc) (define host (->string host-bs)) - (define ssl-version (if (boolean? ssl?) 'sslv2-or-v3 ssl?)) + (define ssl-version (if (boolean? ssl?) 'auto ssl?)) (define-values (from to) (cond [ssl? diff --git a/racket/collects/net/url-connect.rkt b/racket/collects/net/url-connect.rkt index 42fc1be1de..d644cac826 100644 --- a/racket/collects/net/url-connect.rkt +++ b/racket/collects/net/url-connect.rkt @@ -10,7 +10,7 @@ (define current-connect-scheme (make-parameter "http")) -(define current-https-protocol (make-parameter 'sslv2-or-v3)) +(define current-https-protocol (make-parameter 'auto)) ;; Define `tcp-connect' and `tcp-abandon-port' to fit with ;; `current-connect-scheme'