summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorTobias Geerinckx-Rice <me@tobias.gr>2017-10-29 15:53:23 +0100
committerTobias Geerinckx-Rice <me@tobias.gr>2017-10-29 17:32:35 +0100
commit29f7bf59d5d4d4b848eaedc6766bb4e02cae20d3 (patch)
tree8c33ae8646a952245f055aca47cbf4863397c96d
parent6d176ad379e35b3a85da2fb74bc7d2053569602f (diff)
downloadpatches-29f7bf59d5d4d4b848eaedc6766bb4e02cae20d3.tar
patches-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.scm2
-rw-r--r--tests/cpan.scm3
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))