From 3942305eb1a078da9e87534cbd3601097bed36c3 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Mon, 14 Jul 2014 16:14:15 +0200
Subject: [PATCH] guix system: reconfigure: Always use "/" as GRUB's target
file system.
* guix/scripts/system.scm (perform-action) <reconfigure>: Wrap
'install-grub' call in 'false-if-exception'. Always use "/" as the
target.
---
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 be726e21252..10bf7e0c967 100644
--- a/guix/scripts/system.scm
+++ b/guix/scripts/system.scm
@@ -287,7 +287,8 @@ (define* (perform-action action os
((reconfigure)
(mlet %store-monad ((% (switch-to-system os)))
(when grub?
- (unless (install-grub grub.cfg device target)
+ (unless (false-if-exception
+ (install-grub grub.cfg device "/"))
(leave (_ "failed to install GRUB on device '~a'~%")
device)))
(return #t)))
--
GitLab