diff --git a/guix/scripts/system.scm b/guix/scripts/system.scm index 57f42215ee..5737807d8b 100644 --- a/guix/scripts/system.scm +++ b/guix/scripts/system.scm @@ -299,7 +299,8 @@ (define* (perform-action action os (mlet %store-monad ((% (switch-to-system os))) (when grub? (unless (false-if-exception - (install-grub grub.cfg device "/")) + (install-grub (derivation->output-path grub.cfg) + device "/")) (leave (_ "failed to install GRUB on device '~a'~%") device))) (return #t)))