summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMathieu Othacehe <m.othacehe@gmail.com>2018-12-05 14:50:16 +0900
committerLudovic Courtès <ludo@gnu.org>2019-01-17 14:04:23 +0100
commit6aa625c2f82332f8987247958fc18955bd8078f3 (patch)
tree498915d4c9b9b48c2d7cc7e6d0e2d9d914838410
parent29d8d9196bcf7a87eeb891bfb35eb2447836bbeb (diff)
downloadpatches-6aa625c2f82332f8987247958fc18955bd8078f3.tar
patches-6aa625c2f82332f8987247958fc18955bd8078f3.tar.gz
installer: Redirect to TTY3 root shell for unguided install.
* gnu/installer/newt/welcome.scm (run-welcome-page): Switch to TTY3 for unguided shell based install.
-rw-r--r--gnu/installer/newt/welcome.scm16
1 files changed, 8 insertions, 8 deletions
diff --git a/gnu/installer/newt/welcome.scm b/gnu/installer/newt/welcome.scm
index 3a0e45e198..658f7bae40 100644
--- a/gnu/installer/newt/welcome.scm
+++ b/gnu/installer/newt/welcome.scm
@@ -96,18 +96,18 @@ installation and reboot."
(G_ "Welcome to GNU GuixSD installer!
Please note that the present graphical installer is still under heavy \
-development, so you might want to fallback to the classical installer by \
-pressing CTRL-ALT-F3.")
+development, so you might want to prefer using the shell based process. \
+The documentation is accessible at any time by pressing CTRL-ALT-F2.")
logo
#:listbox-items
- `((,(G_ "Install using the unguided shell based process")
+ `((,(G_ "Install using the shell based process")
.
,(lambda ()
- (clear-screen)
- (newt-suspend)
- (system* "bash" "-l")
- (newt-resume)))
- (,(G_ "Graphical install using a guided terminal based interface")
+ ;; Switch to TTY3, where a root shell is available for shell based
+ ;; install. The other root TTY's would have been ok too.
+ (system* "chvt" "3")
+ (run-welcome-page logo)))
+ (,(G_ "Graphical install using a terminal based interface")
.
,(const #t))
(,(G_ "Reboot")