From a8c4b6828810e88db56ab5f0b83fa80e9c962cfa Mon Sep 17 00:00:00 2001 From: Mathieu Othacehe Date: Sun, 6 Jan 2019 11:06:51 +0100 Subject: installer: welcome: Put "Graphical installer" ahead. * gnu/installer/newt/welcome.scm (run-welcome-page): Propose "Graphical install" before shell based install. --- gnu/installer/newt/welcome.scm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'gnu') diff --git a/gnu/installer/newt/welcome.scm b/gnu/installer/newt/welcome.scm index 658f7bae40..eec98e291a 100644 --- a/gnu/installer/newt/welcome.scm +++ b/gnu/installer/newt/welcome.scm @@ -100,16 +100,16 @@ 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 shell based process") + `((,(G_ "Graphical install using a terminal based interface") + . + ,(const #t)) + (,(G_ "Install using the shell based process") . ,(lambda () ;; 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") . ,(lambda () -- cgit v1.2.3