diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2014-07-13 23:44:37 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2014-07-13 23:44:37 +0200 |
| commit | 314a83ef1e80b47b44debc1118e38d7f761e0e7f (patch) | |
| tree | fca8b902a21ea367ad74919d8d1119b54a980666 | |
| parent | fa16f84502d769dc04f80ec4598df3d4cbd176c1 (diff) | |
| download | guix-314a83ef1e80b47b44debc1118e38d7f761e0e7f.tar guix-314a83ef1e80b47b44debc1118e38d7f761e0e7f.tar.gz | |
guix system: Fix return value for 'reconfigure'.
* guix/scripts/system.scm (perform-action) <reconfigure>: Add missing
'return' expression.
| -rw-r--r-- | guix/scripts/system.scm | 3 |
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'...~%") |