From e92a4ad928e869e98043f1f4afc7df20666bbf02 Mon Sep 17 00:00:00 2001 From: Eric Bavier Date: Fri, 13 Feb 2015 21:35:48 -0600 Subject: import: cpan: Use cpan mirror url. * guix/import/cpan.scm (cpan-module->sexp)[source-url]: Substitute cpan mirror url. --- guix/import/cpan.scm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'guix') diff --git a/guix/import/cpan.scm b/guix/import/cpan.scm index bd48c44b1a..3dc6edab51 100644 --- a/guix/import/cpan.scm +++ b/guix/import/cpan.scm @@ -167,7 +167,9 @@ META." (list 'quasiquote inputs)))))) (define source-url - (assoc-ref meta "download_url")) + (regexp-substitute/global #f "http://cpan.metacpan.org" + (assoc-ref meta "download_url") + 'pre "mirror://cpan" 'post)) (let ((tarball (with-store store (download-to-store store source-url)))) -- cgit v1.2.3