mirror of
https://codeberg.org/guix/guix.git
synced 2025-10-02 02:15:12 +00:00
installer: Move the 'locale' step before the 'welcome' step.
* gnu/installer.scm (installer-steps): Move the 'locale step before 'welcome.
This commit is contained in:
parent
04d0aa9905
commit
850ddf94e8
1 changed files with 8 additions and 8 deletions
|
@ -174,14 +174,6 @@ selected keymap."
|
||||||
"/share/zoneinfo/zone.tab")))
|
"/share/zoneinfo/zone.tab")))
|
||||||
#~(lambda (current-installer)
|
#~(lambda (current-installer)
|
||||||
(list
|
(list
|
||||||
;; Welcome the user and ask him to choose between manual
|
|
||||||
;; installation and graphical install.
|
|
||||||
(installer-step
|
|
||||||
(id 'welcome)
|
|
||||||
(compute (lambda _
|
|
||||||
((installer-welcome-page current-installer)
|
|
||||||
#$(local-file "installer/aux-files/logo.txt")))))
|
|
||||||
|
|
||||||
;; Ask the user to choose a locale among those supported by
|
;; Ask the user to choose a locale among those supported by
|
||||||
;; the glibc. Install the selected locale right away, so that
|
;; the glibc. Install the selected locale right away, so that
|
||||||
;; the user may benefit from any available translation for the
|
;; the user may benefit from any available translation for the
|
||||||
|
@ -193,6 +185,14 @@ selected keymap."
|
||||||
(#$locale-step current-installer)))
|
(#$locale-step current-installer)))
|
||||||
(configuration-formatter locale->configuration))
|
(configuration-formatter locale->configuration))
|
||||||
|
|
||||||
|
;; Welcome the user and ask them to choose between manual
|
||||||
|
;; installation and graphical install.
|
||||||
|
(installer-step
|
||||||
|
(id 'welcome)
|
||||||
|
(compute (lambda _
|
||||||
|
((installer-welcome-page current-installer)
|
||||||
|
#$(local-file "installer/aux-files/logo.txt")))))
|
||||||
|
|
||||||
;; Ask the user to select a timezone under glibc format.
|
;; Ask the user to select a timezone under glibc format.
|
||||||
(installer-step
|
(installer-step
|
||||||
(id 'timezone)
|
(id 'timezone)
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue