From mboxrd@z Thu Jan 1 00:00:00 1970 From: ludo@gnu.org (Ludovic =?utf-8?Q?Court=C3=A8s?=) Subject: Re: Generation 0 Date: Thu, 26 Sep 2013 11:44:40 +0200 Message-ID: <87eh8budbr.fsf@gnu.org> References: <87vc2o4qwc.fsf@gnu.org> <87y57kljro.fsf@karetnikov.org> <87hae81uvo.fsf@gnu.org> <87li2oslzh.fsf_-_@karetnikov.org> <87hadcr4sh.fsf_-_@karetnikov.org> <8738ow5zif.fsf@gnu.org> <87vc1r6nu0.fsf@karetnikov.org> <87eh8ebdba.fsf@gnu.org> <871u4d97ku.fsf@karetnikov.org> <87vc1pnjzz.fsf@gnu.org> <87siws22sw.fsf@karetnikov.org> <87vc1oiu1y.fsf@gnu.org> <877ge4jpf3.fsf@karetnikov.org> Mime-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:54874) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1VP8Cj-0003NQ-Bs for guix-devel@gnu.org; Thu, 26 Sep 2013 05:49:55 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1VP8Cd-0003vp-ME for guix-devel@gnu.org; Thu, 26 Sep 2013 05:49:49 -0400 Received: from hera.aquilenet.fr ([141.255.128.1]:33818) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1VP8Cd-0003vl-FV for guix-devel@gnu.org; Thu, 26 Sep 2013 05:49:43 -0400 In-Reply-To: <877ge4jpf3.fsf@karetnikov.org> (Nikita Karetnikov's message of "Thu, 26 Sep 2013 06:18:56 +0400") List-Id: "Development of GNU Guix and the GNU System distribution." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org Sender: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org To: Nikita Karetnikov Cc: guix-devel@gnu.org Nikita Karetnikov skribis: > Anyway, can I push this patch? Yes, please push. > From 00188949e6c49592f6f2dc30bf21731ae142afc0 Mon Sep 17 00:00:00 2001 > From: Nikita Karetnikov > Date: Thu, 26 Sep 2013 02:00:06 +0000 > Subject: [PATCH 1/3] guix package: Exit with 0 when there is nothing to l= ist. > > * 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) > =3D> Ludo=E2=80=99.