diff options
| author | Mathieu Othacehe <m.othacehe@gmail.com> | 2019-01-06 11:06:51 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2019-01-17 14:04:27 +0100 |
| commit | a8c4b6828810e88db56ab5f0b83fa80e9c962cfa (patch) | |
| tree | 4ac19809df10c6c04c86291946d75279af61acb2 /gnu/installer/newt/welcome.scm | |
| parent | ebb36deccc84b1d4414a2b54a3e1df7e7ba94cff (diff) | |
| download | guix-a8c4b6828810e88db56ab5f0b83fa80e9c962cfa.tar.gz | |
installer: welcome: Put "Graphical installer" ahead.
* gnu/installer/newt/welcome.scm (run-welcome-page): Propose "Graphical install" before shell based install.
Diffstat (limited to 'gnu/installer/newt/welcome.scm')
| -rw-r--r-- | gnu/installer/newt/welcome.scm | 8 |
1 files changed, 4 insertions, 4 deletions
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 () |