replace 'sslv2-or-v3 with 'auto in net libs
This commit is contained in:
parent
96cefe88c4
commit
2422218dd9
|
@ -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?
|
||||
|
|
|
@ -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'
|
||||
|
|
Loading…
Reference in New Issue
Block a user