diff options
author | Mathieu Othacehe <m.othacehe@gmail.com> | 2018-12-05 17:49:56 +0900 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2019-01-17 14:04:24 +0100 |
commit | 5bfdde503e0ce3b6518a247e01082848a23aa056 (patch) | |
tree | c10a5f99451dc02ce13e13765c15ffa7705eecfb /gnu/installer.scm | |
parent | 54754efc91e4862f5a904d53a82fcc59e19646a2 (diff) | |
download | guix-5bfdde503e0ce3b6518a247e01082848a23aa056.tar guix-5bfdde503e0ce3b6518a247e01082848a23aa056.tar.gz |
installer: Reorder partitionment step.
* gnu/installer.scm (installer-steps): Run partitionment step after keymap
step, so that the keyboard is correctly mapped when filling the mount-point
entry in partitionment page.
Diffstat (limited to 'gnu/installer.scm')
-rw-r--r-- | gnu/installer.scm | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/gnu/installer.scm b/gnu/installer.scm index 80b5782202..586ed29a59 100644 --- a/gnu/installer.scm +++ b/gnu/installer.scm @@ -174,15 +174,6 @@ selected keymap." ((installer-welcome-page current-installer) #$(local-file "installer/aux-files/logo.txt"))))) - ;; Run a partitionment tool allowing the user to modify - ;; partition tables, partitions and their mount points. - (installer-step - (id 'partition) - (description (G_ "Partitionment")) - (compute (lambda _ - ((installer-partition-page current-installer)))) - (configuration-formatter user-partitions->configuration)) - ;; Ask the user to choose a locale among those supported by ;; the glibc. Install the selected locale right away, so that ;; the user may benefit from any available translation for the @@ -217,6 +208,15 @@ selected keymap." (compute (lambda _ (#$keymap-step current-installer)))) + ;; Run a partitionment tool allowing the user to modify + ;; partition tables, partitions and their mount points. + (installer-step + (id 'partition) + (description (G_ "Partitionment")) + (compute (lambda _ + ((installer-partition-page current-installer)))) + (configuration-formatter user-partitions->configuration)) + ;; Ask the user to input a hostname for the system. (installer-step (id 'hostname) |