diff options
| author | Nicolas Graves <ngraves@ngraves.fr> | 2024-10-07 01:55:59 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2024-10-12 19:44:36 +0200 |
| commit | 92e4c0a00dde99a3864e72b683eb53cb226e86e8 (patch) | |
| tree | 10ffbbcab4e83512746e3e7758765fbd9ff91e55 | |
| parent | 979003c0f0fe30d0328c4d9fc526cc4cde234b9b (diff) | |
| download | guix-92e4c0a00dde99a3864e72b683eb53cb226e86e8.tar.gz guix-92e4c0a00dde99a3864e72b683eb53cb226e86e8.zip | |
import: composer: Handle parsing failures.
* guix/import/composer (latest-release): Handle parsing
failures. Rename package to composer-package for clarity.
Change-Id: I57f6fba7b05122b031177681e76cf0b5c9547736
Signed-off-by: Ludovic Courtès <ludo@gnu.org>
| -rw-r--r-- | guix/import/composer.scm | 19 |
1 files changed, 11 insertions, 8 deletions
diff --git a/guix/import/composer.scm b/guix/import/composer.scm index 1ad608964b..75419ca63e 100644 --- a/guix/import/composer.scm +++ b/guix/import/composer.scm @@ -243,16 +243,19 @@ package in Packagist." (eq? (package-build-system package) composer-build-system) (string-prefix? "php-" (package-name package)))) -(define (latest-release package) +(define* (latest-release package #:key (version #f)) "Return an <upstream-source> for the latest release of PACKAGE." (let* ((php-name (guix-package->composer-name package)) - (package (composer-fetch php-name)) - (version (composer-package-version package)) - (url (composer-source-url (composer-package-source package)))) - (upstream-source - (package (package-name package)) - (version version) - (urls (list url))))) + (composer-package (composer-fetch php-name #:version version))) + (if composer-package + (upstream-source + (package (composer-package-name composer-package)) + (version (composer-package-version composer-package)) + (urls (list (composer-source-url + (composer-package-source composer-package))))) + (begin + (warning (G_ "failed to parse ~a~%") php-name) + #f)))) (define %composer-updater (upstream-updater |