Skip to content
Snippets Groups Projects
Commit 314a83ef authored by Ludovic Courtès's avatar Ludovic Courtès
Browse files

guix system: Fix return value for 'reconfigure'.

* guix/scripts/system.scm (perform-action) <reconfigure>: Add missing
  'return' expression.
parent fa16f845
No related branches found
No related tags found
No related merge requests found
...@@ -289,7 +289,8 @@ (define* (perform-action action os ...@@ -289,7 +289,8 @@ (define* (perform-action action os
(when grub? (when grub?
(unless (install-grub grub.cfg device target) (unless (install-grub grub.cfg device target)
(leave (_ "failed to install GRUB on device '~a'~%") (leave (_ "failed to install GRUB on device '~a'~%")
device))))) device)))
(return #t)))
((init) ((init)
(newline) (newline)
(format #t (_ "initializing operating system under '~a'...~%") (format #t (_ "initializing operating system under '~a'...~%")
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment