ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-28 15:22:18 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

import: cpan: Gracefully handle missing projects.

Browse source 
* guix/import/cpan.scm (cpan-fetch): Check whether 'json-fetch' returns #f.
This commit is contained in:
Ludovic Courtès 2020-03-12 11:18:40 +01:00
parent 2d0409a4a2
commit c00ae79cca
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
guix/import/cpan.scm
View file

@ -181,9 +181,9 @@ (define (cpan-fetch name)
or #f on failure. MODULE should be the distribution name, such as
\"Test-Script\" for the \"Test::Script\" module."
;; This API always returns the latest release of the module.
(json->cpan-release
(json-fetch (string-append (%metacpan-base-url) "/release/"
name))))
(and=> (json-fetch (string-append (%metacpan-base-url) "/release/"
name))
json->cpan-release))
(define (cpan-home name)
(string-append "https://metacpan.org/release/" name))