allow some redirections in the url that looks for the new version
This commit is contained in:
parent
70e0cac062
commit
683492f6fe
|
@ -8,7 +8,8 @@
|
|||
(define timeout 30)
|
||||
|
||||
(define (url->port url)
|
||||
(get-pure-port (string->url url)))
|
||||
(get-pure-port (string->url url)
|
||||
#:redirections 5))
|
||||
|
||||
(define error-value
|
||||
(case-lambda
|
||||
|
|
Loading…
Reference in New Issue
Block a user