diff options
| author | Tobias Geerinckx-Rice <me@tobias.gr> | 2017-10-29 15:53:23 +0100 |
|---|---|---|
| committer | Tobias Geerinckx-Rice <me@tobias.gr> | 2017-10-29 17:32:35 +0100 |
| commit | 29f7bf59d5d4d4b848eaedc6766bb4e02cae20d3 (patch) | |
| tree | 8c33ae8646a952245f055aca47cbf4863397c96d | |
| parent | 6d176ad379e35b3a85da2fb74bc7d2053569602f (diff) | |
| download | guix-29f7bf59d5d4d4b848eaedc6766bb4e02cae20d3.tar.gz | |
import: cpan: Use HTTPS for home pages.
* guix/import/cpan.scm (cpan-home): Use HTTPS.
* tests/cpan.scm ("cpan->guix-package"): Expect it.
| -rw-r--r-- | guix/import/cpan.scm | 2 | ||||
| -rw-r--r-- | tests/cpan.scm | 3 |
2 files changed, 3 insertions, 2 deletions
diff --git a/guix/import/cpan.scm b/guix/import/cpan.scm index 2ef02c43a4..792da0ab31 100644 --- a/guix/import/cpan.scm +++ b/guix/import/cpan.scm @@ -116,7 +116,7 @@ or #f on failure. MODULE should be e.g. \"Test::Script\"" (json-fetch (string-append "https://fastapi.metacpan.org/v1/release/" name))) (define (cpan-home name) - (string-append "http://search.cpan.org/dist/" name "/")) + (string-append "https://search.cpan.org/dist/" name "/")) (define (cpan-source-url meta) "Return the download URL for a module's source tarball." diff --git a/tests/cpan.scm b/tests/cpan.scm index e5bd0ae3a4..36712ceeb7 100644 --- a/tests/cpan.scm +++ b/tests/cpan.scm @@ -1,6 +1,7 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2015 Eric Bavier <bavier@member.fsf.org> ;;; Copyright © 2016 Alex Sassmannshausen <alex@pompo.co> +;;; Copyright © 2017 Tobias Geerinckx-Rice <me@tobias.gr> ;;; ;;; This file is part of GNU Guix. ;;; @@ -97,7 +98,7 @@ ('propagated-inputs ('quasiquote (("perl-test-script" ('unquote 'perl-test-script))))) - ('home-page "http://search.cpan.org/dist/Foo-Bar/") + ('home-page "https://search.cpan.org/dist/Foo-Bar/") ('synopsis "Fizzle Fuzz") ('description 'fill-in-yourself!) ('license 'perl-license)) |