From 44c6a87f53690dd47a8ef1f139b863ba696104a1 Mon Sep 17 00:00:00 2001 From: Ludovic Courtès Date: Wed, 25 Oct 2017 20:35:43 -0700 Subject: guix package: '--list-available' does not show superseded packages. * guix/scripts/package.scm (process-query) <'list-available>: Filter out P if it matches 'package-superseded'. --- guix/scripts/package.scm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/guix/scripts/package.scm b/guix/scripts/package.scm index 0e365018a9..f972ca2ef7 100644 --- a/guix/scripts/package.scm +++ b/guix/scripts/package.scm @@ -738,7 +738,8 @@ processed, #f otherwise." (available (fold-packages (lambda (p r) (let ((n (package-name p))) - (if (supported-package? p) + (if (and (supported-package? p) + (not (package-superseded p))) (if regexp (if (regexp-exec regexp n) (cons p r) -- cgit v1.2.3