jmd pushed a commit to branch wip-installer
in repository guix.
commit 5cd787410435e495d57eda63b3f33df3c529d6c7
Author: John Darrington <[email protected]>
Date: Tue Jan 3 12:51:01 2017 +0100
installer: Add confidence indicator.
* gnu/system/installer/install.scm (install-page-key-handler): Display a
message
immediately before starting guix system init.
---
gnu/system/installer/install.scm | 3 +++
1 file changed, 3 insertions(+)
diff --git a/gnu/system/installer/install.scm b/gnu/system/installer/install.scm
index 4e97548..dc96a3d 100644
--- a/gnu/system/installer/install.scm
+++ b/gnu/system/installer/install.scm
@@ -98,6 +98,9 @@
(file-exists? (string-append target "/etc/config.scm"))
+ (display (gettext "Installing the system ...") window-port)
+ (force-output window-port)
+
(zero? (pipe-cmd window-port "guix" "guix" "system" "init"
(string-append target "/etc/config.scm")
target))
