diff options
author | Ludovic Courtès <ludo@gnu.org> | 2017-09-14 23:16:22 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2017-09-14 23:34:35 +0200 |
commit | c105653329bba7e71b960c782515ca23edf83e3f (patch) | |
tree | d5de3fa17d5597e099b0b1694c9db5df7058c605 | |
parent | db7f7eb8ca670ee5d76e3bad3ada29e87e3f6a10 (diff) | |
download | patches-c105653329bba7e71b960c782515ca23edf83e3f.tar patches-c105653329bba7e71b960c782515ca23edf83e3f.tar.gz |
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'.
-rw-r--r-- | guix/scripts/download.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/guix/scripts/download.scm b/guix/scripts/download.scm index f40213be33..8225f82bb9 100644 --- a/guix/scripts/download.scm +++ b/guix/scripts/download.scm @@ -49,7 +49,7 @@ ((or 'file #f) (copy-file (uri-path uri) file)) (_ - (url-fetch url file))) + (url-fetch url file #:mirrors %mirrors))) file)) (define* (download-to-store* url #:key (verify-certificate? #t)) |