summary refs log tree commit diff
path: root/gnu
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2019-04-07 16:16:14 +0200
committerLudovic Courtès <ludo@gnu.org>2019-04-07 16:16:14 +0200
commit850ddf94e86a1711328e39872c7830ad6d5020b4 (patch)
tree148d19d91956d9013114ed519367da8990b132cd /gnu
parent04d0aa99059e4925dcfb55d4d9a550f225948612 (diff)
downloadguix-850ddf94e86a1711328e39872c7830ad6d5020b4.tar.gz
installer: Move the 'locale' step before the 'welcome' step.
* gnu/installer.scm (installer-steps): Move the 'locale step before
'welcome.
Diffstat (limited to 'gnu')
-rw-r--r--gnu/installer.scm16
1 files changed, 8 insertions, 8 deletions
diff --git a/gnu/installer.scm b/gnu/installer.scm
index 584ca3842f..5694cef66f 100644
--- a/gnu/installer.scm
+++ b/gnu/installer.scm
@@ -174,14 +174,6 @@ selected keymap."
                                         "/share/zoneinfo/zone.tab")))
     #~(lambda (current-installer)
         (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
          ;; the glibc.  Install the selected locale right away, so that
          ;; the user may benefit from any available translation for the
@@ -193,6 +185,14 @@ selected keymap."
                      (#$locale-step current-installer)))
           (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.
          (installer-step
           (id 'timezone)