aboutsummaryrefslogtreecommitdiff
path: root/guix
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2014-07-13 23:44:37 +0200
committerLudovic Courtès <ludo@gnu.org>2014-07-13 23:44:37 +0200
commit314a83ef1e80b47b44debc1118e38d7f761e0e7f (patch)
treefca8b902a21ea367ad74919d8d1119b54a980666 /guix
parentfa16f84502d769dc04f80ec4598df3d4cbd176c1 (diff)
downloadgnu-guix-314a83ef1e80b47b44debc1118e38d7f761e0e7f.tar
gnu-guix-314a83ef1e80b47b44debc1118e38d7f761e0e7f.tar.gz
guix system: Fix return value for 'reconfigure'.
* guix/scripts/system.scm (perform-action) <reconfigure>: Add missing 'return' expression.
Diffstat (limited to 'guix')
-rw-r--r--guix/scripts/system.scm3
1 files changed, 2 insertions, 1 deletions
diff --git a/guix/scripts/system.scm b/guix/scripts/system.scm
index ec098a08eb..be726e2125 100644
--- a/guix/scripts/system.scm
+++ b/guix/scripts/system.scm
@@ -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'...~%")