guix download: Honor mirrors when using '-o'.
Previously "guix download -o x mirror://gnu/…" would fail. * guix/scripts/download.scm (download-to-file): Pass #:mirrors to 'url-fetch'.
This commit is contained in:
parent
db7f7eb8ca
commit
c105653329
|
@ -49,7 +49,7 @@ (define (download-to-file url file)
|
||||||
((or 'file #f)
|
((or 'file #f)
|
||||||
(copy-file (uri-path uri) file))
|
(copy-file (uri-path uri) file))
|
||||||
(_
|
(_
|
||||||
(url-fetch url file)))
|
(url-fetch url file #:mirrors %mirrors)))
|
||||||
file))
|
file))
|
||||||
|
|
||||||
(define* (download-to-store* url #:key (verify-certificate? #t))
|
(define* (download-to-store* url #:key (verify-certificate? #t))
|
||||||
|
|
Loading…
Reference in a new issue