summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2016-07-31 18:26:29 +0200
committerLudovic Courtès <ludo@gnu.org>2016-07-31 18:27:14 +0200
commit40f788b9f6184436d9cc36a4dd8e7d101cd2f0ba (patch)
treed6e8aa907d2653adc896717b9f1261a1a5d6abd9
parent38f1cf8a8e9c479f72d49bc126d317f5608c28fe (diff)
download: Add mirror.hydra.gnu.org as a content-addressed mirror.
* guix/download.scm (%content-addressed-mirrors): Add 'mirror.hydra.gnu.org'.
-rw-r--r--guix/download.scm7
1 files changed, 7 insertions, 0 deletions
diff --git a/guix/download.scm b/guix/download.scm
index 73c0e897b4..b2dcdc88f9 100644
--- a/guix/download.scm
+++ b/guix/download.scm
@@ -236,8 +236,15 @@
;; List of content-addressed mirrors. Each mirror is represented as a
;; procedure that takes a file name, an algorithm (symbol) and a hash
;; (bytevector), and returns a URL or #f.
+ ;; Note: Avoid 'https' to mitigate <http://bugs.gnu.org/22774>.
;; TODO: Add more.
'(list (lambda (file algo hash)
+ ;; Files served by 'guix publish' are accessible under a single
+ ;; hash algorithm.
+ (string-append "http://mirror.hydra.gnu.org/file/"
+ file "/" (symbol->string algo) "/"
+ (bytevector->nix-base32-string hash)))
+ (lambda (file algo hash)
;; 'tarballs.nixos.org' supports several algorithms.
(string-append "http://tarballs.nixos.org/"
(symbol->string algo) "/"