install: The list of services is now a plain list.

* gnu/system/install.scm (installation-services): Rename to...
(%installation-services): ... this.  Turn into a list instead of a thunk.
This commit is contained in:
Ludovic Courtès 2016-12-19 18:35:54 +01:00
parent acb5f7c3fc
commit 58b21e1e09
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -255,8 +255,8 @@ (define %nscd-minimal-caches
(persistent? #f) (persistent? #f)
(max-database-size (* 5 (expt 2 20)))))) ;5 MiB (max-database-size (* 5 (expt 2 20)))))) ;5 MiB
(define (installation-services) (define %installation-services
"Return the list services for the installation image." ;; List of services of the installation system.
(let ((motd (plain-file "motd" " (let ((motd (plain-file "motd" "
Welcome to the installation of the Guix System Distribution! Welcome to the installation of the Guix System Distribution!
@ -377,8 +377,7 @@ (define installation-os
(home-directory "/home/guest")))) (home-directory "/home/guest"))))
(issue %issue) (issue %issue)
(services %installation-services)
(services (installation-services))
;; We don't need setuid programs so pass the empty list so we don't pull ;; We don't need setuid programs so pass the empty list so we don't pull
;; additional programs here. ;; additional programs here.