From 6aa625c2f82332f8987247958fc18955bd8078f3 Mon Sep 17 00:00:00 2001 From: Mathieu Othacehe Date: Wed, 5 Dec 2018 14:50:16 +0900 Subject: 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. --- gnu/installer/newt/welcome.scm | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) (limited to 'gnu/installer') 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 @@ (define (run-welcome-page logo) (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") -- cgit v1.2.3