guix package: '--show' ignores deprecated packages.

* guix/scripts/package.scm (process-query) <'show>: Remove superseded
packages.
* tests/guix-package-aliases.sh: Add test.
This commit is contained in:
Ludovic Courtès 2019-09-20 23:02:30 +02:00
parent aeb51370da
commit 660dbe6564
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
2 changed files with 5 additions and 1 deletions

View file

@ -764,7 +764,8 @@ (define (diff-profiles profile numbers)
(('show requested-name)
(let-values (((name version)
(package-name->name+version requested-name)))
(match (find-packages-by-name name version)
(match (remove package-superseded
(find-packages-by-name name version))
(()
(leave (G_ "~a~@[@~a~]: package not found~%") name version))
(packages

View file

@ -62,3 +62,6 @@ guix search '\<board\>' game | grep '^name: gnubg'
guix show --version
guix show guile
guix show python@3 | grep "^name: python"
# "python@2" exists but is deprecated; make sure it doesn't show up.
if guix show python@2; then false; else true; fi