[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
02/03: guix system: List old generations from newest to oldest.
From: |
guix-commits |
Subject: |
02/03: guix system: List old generations from newest to oldest. |
Date: |
Wed, 13 Feb 2019 10:20:10 -0500 (EST) |
civodul pushed a commit to branch master
in repository guix.
commit 1e9698344dcd0f44453be7cbb384a2eefe46441f
Author: Ludovic Courtès <address@hidden>
Date: Wed Feb 13 15:31:05 2019 +0100
guix system: List old generations from newest to oldest.
Previously 'guix system switch-generation' or 'delete-generations' would
yield a GRUB menu where entries for old generations were in the wrong
order (i.e., oldest first.)
* guix/scripts/system.scm (reinstall-bootloader): Reverse the list
returned by 'generation-numbers'.
---
guix/scripts/system.scm | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/guix/scripts/system.scm b/guix/scripts/system.scm
index c0301ea..d67b9f8 100644
--- a/guix/scripts/system.scm
+++ b/guix/scripts/system.scm
@@ -492,7 +492,8 @@ STORE is an open connection to the store."
;; Make the specified system generation the default entry.
(params (profile-boot-parameters %system-profile (list number)))
- (old-generations (delv number (generation-numbers %system-profile)))
+ (old-generations
+ (delv number (reverse (generation-numbers %system-profile))))
(old-params (profile-boot-parameters
%system-profile old-generations))
(entries (map boot-parameters->menu-entry params))