diff options
author | Ludovic Courtès <ludo@gnu.org> | 2019-04-07 17:15:06 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2019-04-07 17:18:04 +0200 |
commit | 75988317b22efee2b2719e7d559fa9ff01a9db9a (patch) | |
tree | 942a784ba68be4c0a7f16582016514cff2c292d5 /gnu/installer.scm | |
parent | e8aa4e9511e500ae23439b653e0b5e0f78c31159 (diff) | |
download | guix-75988317b22efee2b2719e7d559fa9ff01a9db9a.tar.gz |
installer: Generalize desktop environments to system services.
* gnu/installer/services.scm (<desktop-environment>): Rename to... (<system-service>): ... this. Add a 'type' field. (%desktop-environments): Rename to... (%system-services): ... this. (desktop-system-service?): New procedure. (desktop-environments->configuration): Rename to... (system-services->configuration): ... this. Determine the base list of services based on whether SERVICES contains at least one "desktop" service. * gnu/installer/newt/services.scm (run-desktop-environments-cbt-page): Adjust accordingly. * gnu/installer.scm (installer-steps): Likewise.
Diffstat (limited to 'gnu/installer.scm')
-rw-r--r-- | gnu/installer.scm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/gnu/installer.scm b/gnu/installer.scm index 5694cef66f..50e2e7d85e 100644 --- a/gnu/installer.scm +++ b/gnu/installer.scm @@ -256,8 +256,7 @@ selected keymap." (description (G_ "Services")) (compute (lambda _ ((installer-services-page current-installer)))) - (configuration-formatter - desktop-environments->configuration)) + (configuration-formatter system-services->configuration)) (installer-step (id 'final) |