summary refs log tree commit diff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2018-09-07 14:19:42 +0200
committerLudovic Courtès <ludo@gnu.org>2018-09-07 14:19:42 +0200
commitda34a19f3af425b5596c09fb388f0a2ee04d4bba (patch)
tree960fa6d61d6230da42ee46fee484ca295c1af730
parent2b73d82830a29e60914ca23cc64440adb3ae4d18 (diff)
downloadguix-da34a19f3af425b5596c09fb388f0a2ee04d4bba.tar.gz
guix describe: Display information about the current generation.
* guix/scripts/describe.scm (display-profile-info)[number]: Use the
current generation number instead of the last generation number.
-rw-r--r--guix/scripts/describe.scm3
1 files changed, 1 insertions, 2 deletions
diff --git a/guix/scripts/describe.scm b/guix/scripts/describe.scm
index 46feea2940..fdff07d0e3 100644
--- a/guix/scripts/describe.scm
+++ b/guix/scripts/describe.scm
@@ -108,8 +108,7 @@ within a Git checkout."
   "Display information about PROFILE, a profile as created by (guix channels),
 in the format specified by FMT."
   (define number
-    (match (profile-generations profile)
-      ((_ ... last) last)))
+    (generation-number profile))
 
   (match fmt
     ('human