~ruther/guix-local

e92a4ad928e869e98043f1f4afc7df20666bbf02 — Eric Bavier 11 years ago a0c2c4b
import: cpan: Use cpan mirror url.

* guix/import/cpan.scm (cpan-module->sexp)[source-url]: Substitute cpan mirror
  url.
1 files changed, 3 insertions(+), 1 deletions(-)

M guix/import/cpan.scm
M guix/import/cpan.scm => guix/import/cpan.scm +3 -1
@@ 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))))