1
0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2026-04-28 13:10:33 +02:00

guix package: Exit with 0 when there is nothing to list.

* guix/scripts/package.scm (guix-package)[process-query]: Exit with 0
  when there are no generations containing packages or no profiles.
This commit is contained in:
Nikita Karetnikov
2013-09-26 02:00:06 +00:00
parent c9cb0825c9
commit 4658b2c47b

View File

@@ -983,7 +983,7 @@ more information.~%"))
((string-null? pattern)
(let ((numbers (generation-numbers profile)))
(if (equal? numbers '(0))
(exit 1)
(exit 0)
(for-each list-generation numbers))))
((matching-generations pattern profile)
=>