From b5c7574b2f6fe7752b02eaaa8a745a35b3beb2a1 Mon Sep 17 00:00:00 2001 From: Tobias Geerinckx-Rice Date: Mon, 30 Oct 2017 13:28:10 +0100 Subject: [PATCH] Revert "import: cpan: Use HTTPS for home pages." This reverts commit 29f7bf59d5d4d4b848eaedc6766bb4e02cae20d3: HTTPS support at search.cpan.org is unreliable, at best. Don't rely on it. --- guix/import/cpan.scm | 2 +- tests/cpan.scm | 3 +-- 2 files changed, 2 insertions(+), 3 deletions(-) diff --git a/guix/import/cpan.scm b/guix/import/cpan.scm index 792da0ab31..2ef02c43a4 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 "https://search.cpan.org/dist/" name "/")) + (string-append "http://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 36712ceeb7..e5bd0ae3a4 100644 --- a/tests/cpan.scm +++ b/tests/cpan.scm @@ -1,7 +1,6 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2015 Eric Bavier ;;; Copyright © 2016 Alex Sassmannshausen -;;; Copyright © 2017 Tobias Geerinckx-Rice ;;; ;;; This file is part of GNU Guix. ;;; @@ -98,7 +97,7 @@ ('propagated-inputs ('quasiquote (("perl-test-script" ('unquote 'perl-test-script))))) - ('home-page "https://search.cpan.org/dist/Foo-Bar/") + ('home-page "http://search.cpan.org/dist/Foo-Bar/") ('synopsis "Fizzle Fuzz") ('description 'fill-in-yourself!) ('license 'perl-license))