summary refs log tree commit diff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2018-11-21 13:56:31 +0100
committerLudovic Courtès <ludo@gnu.org>2018-11-21 23:26:58 +0100
commita29ce1f97dc8336e5a063f14d98d673b33b4bff4 (patch)
tree5342b0938df73bd9153aaff959639a48d174cc5c
parentd9f8e846b69fc89356d9497c0a51c53cb2e53a5e (diff)
downloadguix-a29ce1f97dc8336e5a063f14d98d673b33b4bff4.tar.gz
guix system: Fix 'init' again.
Fixes a regression introduced in
52ee4479ef26826a53b9929cd00ca7738be687b1, whereby 'install' would now be
passed a procedure instead of a lowerable object.

* guix/scripts/system.scm (perform-action): Pass BOOTLOADER-SCRIPT as
the #:bootloader-installer argument of 'install'.
-rw-r--r--guix/scripts/system.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/guix/scripts/system.scm b/guix/scripts/system.scm
index 00d2fe4829..d92ec7d5a5 100644
--- a/guix/scripts/system.scm
+++ b/guix/scripts/system.scm
@@ -910,7 +910,7 @@ static checks."
                       #:install-bootloader? install-bootloader?
                       #:bootcfg bootcfg
                       #:bootcfg-file bootcfg-file
-                      #:bootloader-installer bootloader-installer))
+                      #:bootloader-installer bootloader-script))
             (else
              ;; All we had to do was to build SYS and maybe register an
              ;; indirect GC root.