3
4
Fork 0
mirror of git://git.savannah.gnu.org/guix.git synced 2023-12-14 03:33:07 +01:00

guix system: Fix return value for 'reconfigure'.

* guix/scripts/system.scm (perform-action) <reconfigure>: Add missing
  'return' expression.
This commit is contained in:
Ludovic Courtès 2014-07-13 23:44:37 +02:00
parent fa16f84502
commit 314a83ef1e

View file

@ -289,7 +289,8 @@ actions."
(when grub?
(unless (install-grub grub.cfg device target)
(leave (_ "failed to install GRUB on device '~a'~%")
device)))))
device)))
(return #t)))
((init)
(newline)
(format #t (_ "initializing operating system under '~a'...~%")