aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2017-09-14 23:16:22 +0200
committerLudovic Courtès <ludo@gnu.org>2017-09-14 23:34:35 +0200
commitc105653329bba7e71b960c782515ca23edf83e3f (patch)
treed5de3fa17d5597e099b0b1694c9db5df7058c605
parentdb7f7eb8ca670ee5d76e3bad3ada29e87e3f6a10 (diff)
downloadpatches-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.scm2
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))