diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2016-06-08 17:59:45 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2016-06-08 19:07:58 +0200 |
| commit | dc794a723809f0f28e49e4c32e8974b5b9a98ff0 (patch) | |
| tree | 54f4863bec165af1eac176aa4a4a46f5a44d4fc1 /guix/import | |
| parent | ae768308575051050f71dabdb15d0b71223f1c2a (diff) | |
gnu-maintenance: Replace 'find-packages' with 'find-package' (singular).
Fixes <http://bugs.gnu.org/23718>.
Reported by Efraim Flashner <efraim@flashner.co.il>.
* guix/gnu-maintenance.scm (find-packages): Remove.
(find-package): New procedure.
* guix/import/gnu.scm (gnu->guix-package): Use 'find-package' instead of
'find-packages' and adjust accordingly.
Diffstat (limited to 'guix/import')
| -rw-r--r-- | guix/import/gnu.scm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/guix/import/gnu.scm b/guix/import/gnu.scm index 2cfb46beb9..bbb17047f0 100644 --- a/guix/import/gnu.scm +++ b/guix/import/gnu.scm @@ -111,13 +111,13 @@ details.)" (match (latest-release name) ((? upstream-source? release) (let ((version (upstream-source-version release))) - (match (find-packages (regexp-quote name)) - ((info . _) - (gnu-package->sexp info release #:key-download key-download)) - (() + (match (find-package name) + (#f (raise (condition (&message - (message "couldn't find meta-data for GNU package")))))))) + (message "couldn't find meta-data for GNU package"))))) + (info + (gnu-package->sexp info release #:key-download key-download))))) (_ (raise (condition (&message |