summaryrefslogtreecommitdiff
path: root/guix/import
diff options
context:
space:
mode:
authorng0 <ng0@we.make.ritual.n0.is>2016-08-30 12:57:47 +0000
committerEric Bavier <bavier@member.fsf.org>2016-08-30 13:21:07 -0500
commit7a62263ee50c9e2894ea0e746b89f04e3b6484c3 (patch)
tree57e642bdc28afd1a561e221ee909170805e0185f /guix/import
parent6a540995fbc1779cfcade0bf6fe67c65d0df6304 (diff)
import: cpan: Use tls to query api.metacpan.org.
* guix/import/cpan.scm (module->dist-name, cpan-fetch-module): Use tls for api.metacpan.org. Signed-off-by: Eric Bavier <bavier@member.fsf.org>
Diffstat (limited to 'guix/import')
-rw-r--r--guix/import/cpan.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/guix/import/cpan.scm b/guix/import/cpan.scm
index 213a155fd6..5b7c47554a 100644
--- a/guix/import/cpan.scm
+++ b/guix/import/cpan.scm
@@ -83,7 +83,7 @@
"Return the base distribution module for a given module. E.g. the 'ok'
module is distributed with 'Test::Simple', so (module->dist-name \"ok\") would
return \"Test-Simple\""
- (assoc-ref (json-fetch (string-append "http://api.metacpan.org/module/"
+ (assoc-ref (json-fetch (string-append "https://api.metacpan.org/module/"
module))
"distribution"))
@@ -91,7 +91,7 @@ return \"Test-Simple\""
"Return an alist representation of the CPAN metadata for the perl module MODULE,
or #f on failure. MODULE should be e.g. \"Test::Script\""
;; This API always returns the latest release of the module.
- (json-fetch (string-append "http://api.metacpan.org/release/"
+ (json-fetch (string-append "https://api.metacpan.org/release/"
;; XXX: The 'release' api requires the "release"
;; name of the package. This substitution seems
;; reasonably consistent across packages.