aboutsummaryrefslogtreecommitdiff
path: root/guix/scripts/package.scm
diff options
context:
space:
mode:
authorNikita Karetnikov <nikita@karetnikov.org>2013-09-24 22:18:09 +0000
committerNikita Karetnikov <nikita@karetnikov.org>2013-09-25 16:08:39 +0000
commit4b2bc804d861ff5ba550dac0b56f1fe44f079847 (patch)
tree9f4ab9edd94e9dcd6e851e05588a58c3865152fd /guix/scripts/package.scm
parent0ab212b9466d5aa3fe801c9137248703245d8513 (diff)
downloadgnu-guix-4b2bc804d861ff5ba550dac0b56f1fe44f079847.tar
gnu-guix-4b2bc804d861ff5ba550dac0b56f1fe44f079847.tar.gz
guix package: Do not list the zeroth generation.
* guix/scripts/package.scm (guix-package)[process-query]: Change 'list-generation' to not list the zeroth generation. * tests/guix-package.sh: Test it. * doc/guix.texi (Invoking guix package): Document it, and use the right term when talking about generations.
Diffstat (limited to 'guix/scripts/package.scm')
-rw-r--r--guix/scripts/package.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/guix/scripts/package.scm b/guix/scripts/package.scm
index 1f21890fcd..dab3d5bb0c 100644
--- a/guix/scripts/package.scm
+++ b/guix/scripts/package.scm
@@ -955,7 +955,7 @@ more information.~%"))
(match (assoc-ref opts 'query)
(('list-generations pattern)
(define (list-generation number)
- (begin
+ (unless (zero? number)
(format #t (_ "Generation ~a\t~a~%") number
(date->string
(time-utc->date