diff options
author | Eric Bavier <bavier@member.fsf.org> | 2015-02-13 21:35:48 -0600 |
---|---|---|
committer | Eric Bavier <bavier@member.fsf.org> | 2015-02-18 23:53:46 -0600 |
commit | e92a4ad928e869e98043f1f4afc7df20666bbf02 (patch) | |
tree | 2a2e9ce37de1f31460a73822145b6d3311bd4eb6 | |
parent | a0c2c4b45bb9c7b77f2b9a1562e791f1124cf93c (diff) | |
download | patches-e92a4ad928e869e98043f1f4afc7df20666bbf02.tar patches-e92a4ad928e869e98043f1f4afc7df20666bbf02.tar.gz |
import: cpan: Use cpan mirror url.
* guix/import/cpan.scm (cpan-module->sexp)[source-url]: Substitute cpan mirror
url.
-rw-r--r-- | guix/import/cpan.scm | 4 |
1 files changed, 3 insertions, 1 deletions
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)))) |