summary refs log tree commit diff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2019-02-01 12:43:42 +0100
committerLudovic Courtès <ludo@gnu.org>2019-02-01 19:28:49 +0100
commit35ef5bc8662b42bd8de3da1d720c12dc9e430f4e (patch)
tree23c79bb25610a0cd21bef2a6902c9d9443e0f207
parent389ae5181e746d2401e852bdd7ffc0d074f49d5f (diff)
downloadguix-35ef5bc8662b42bd8de3da1d720c12dc9e430f4e.tar.gz
guix package: '-A' no longer lists deprecated packages.
Fixes a regression introduced in
0ea939fb796fdd4f0d46d3534b2ec6135e0f3dc7.

* guix/scripts/package.scm (process-query) <'list-available>: Change
 #:superseded? to #:deprecated? since that's what
 'fold-available-packages' passes.
-rw-r--r--guix/scripts/package.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/guix/scripts/package.scm b/guix/scripts/package.scm
index a633d2ee6d..8a71467b52 100644
--- a/guix/scripts/package.scm
+++ b/guix/scripts/package.scm
@@ -739,9 +739,9 @@ processed, #f otherwise."
               (available (fold-available-packages
                           (lambda* (name version result
                                          #:key outputs location
-                                         supported? superseded?
+                                         supported? deprecated?
                                          #:allow-other-keys)
-                            (if (and supported? (not superseded?))
+                            (if (and supported? (not deprecated?))
                                 (if regexp
                                     (if (regexp-exec regexp name)
                                         (cons `(,name ,version