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>

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.