installer: welcome: Put "Graphical installer" ahead.
* gnu/installer/newt/welcome.scm (run-welcome-page): Propose "Graphical install" before shell based install.
This commit is contained in:
parent
ebb36deccc
commit
a8c4b68288
|
@ -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 ()
|
||||
|
|
Loading…
Reference in New Issue