guix system: Fix typo affecting 'guix system init'.
Fixes <http://bugs.gnu.org/19279>.
Fixes a regression introduced in cc7fa59
.
Reported by Tomas Cech <tcech@suse.cz>.
* guix/scripts/system.scm (install): Fix order of arguments to 'lift'
and 'lift2'.
This commit is contained in:
parent
847391fe62
commit
c9e46f1c39
|
@ -164,8 +164,8 @@ When GRUB? is true, install GRUB on DEVICE, using GRUB.CFG."
|
||||||
(copy-closure to-copy target #:log-port log-port)))))
|
(copy-closure to-copy target #:log-port log-port)))))
|
||||||
|
|
||||||
(let ((os-dir (derivation->output-path os-drv))
|
(let ((os-dir (derivation->output-path os-drv))
|
||||||
(format (lift %store-monad format))
|
(format (lift format %store-monad))
|
||||||
(populate (lift2 %store-monad populate-root-file-system)))
|
(populate (lift2 populate-root-file-system %store-monad)))
|
||||||
|
|
||||||
(mbegin %store-monad
|
(mbegin %store-monad
|
||||||
(maybe-copy os-dir)
|
(maybe-copy os-dir)
|
||||||
|
|
Loading…
Reference in New Issue