summaryrefslogtreecommitdiff
path: root/gnu/installer.scm
diff options
context:
space:
mode:
authorMathieu Othacehe <m.othacehe@gmail.com>2018-12-05 17:49:56 +0900
committerLudovic Courtès <ludo@gnu.org>2019-01-17 14:04:24 +0100
commit5bfdde503e0ce3b6518a247e01082848a23aa056 (patch)
treec10a5f99451dc02ce13e13765c15ffa7705eecfb /gnu/installer.scm
parent54754efc91e4862f5a904d53a82fcc59e19646a2 (diff)
downloadguix-patches-5bfdde503e0ce3b6518a247e01082848a23aa056.tar
guix-patches-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.scm18
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)