Re: Generation 0

[Ludovic Courtès]

Nikita Karetnikov <address@hidden> skribis:

> Anyway, can I push this patch?

Yes, please push.

> From 00188949e6c49592f6f2dc30bf21731ae142afc0 Mon Sep 17 00:00:00 2001
> From: Nikita Karetnikov <address@hidden>
> Date: Thu, 26 Sep 2013 02:00:06 +0000
> Subject: [PATCH 1/3] 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.
> ---
>  guix/scripts/package.scm |    2 +-
>  1 file changed, 1 insertion(+), 1 deletion(-)
>
> diff --git a/guix/scripts/package.scm b/guix/scripts/package.scm
> index 66505f1..ed1e72c 100644
> --- a/guix/scripts/package.scm
> +++ b/guix/scripts/package.scm
> @@ -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)
>                  =>

Ludo’.