replace 'sslv2-or-v3 with 'auto in net libs

This commit is contained in:
Ryan Culpepper 2014-10-31 12:22:34 -04:00
parent 96cefe88c4
commit 2422218dd9
2 changed files with 2 additions and 2 deletions

View File

@ -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?

View File

@ -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'