aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2017-10-25 20:35:43 -0700
committerLudovic Courtès <ludo@gnu.org>2017-10-25 22:25:19 -0700
commit44c6a87f53690dd47a8ef1f139b863ba696104a1 (patch)
treee34e42361d8c0cd14e814ed49a7475786a485873
parent17650569d44efbd6425f0bd93a8ff57f220034ed (diff)
downloadpatches-44c6a87f53690dd47a8ef1f139b863ba696104a1.tar
patches-44c6a87f53690dd47a8ef1f139b863ba696104a1.tar.gz
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'.
-rw-r--r--guix/scripts/package.scm3
1 files changed, 2 insertions, 1 deletions
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)