services: profile: Use a declarative profile.
* gnu/services.scm (packages->profile-entry): Use 'profile' instead of 'profile-derivation'.master
parent
cda751105e
commit
45bd91334f
|
@ -691,10 +691,10 @@ executables, making them setuid-root.")))
|
||||||
|
|
||||||
(define (packages->profile-entry packages)
|
(define (packages->profile-entry packages)
|
||||||
"Return a system entry for the profile containing PACKAGES."
|
"Return a system entry for the profile containing PACKAGES."
|
||||||
(mlet %store-monad ((profile (profile-derivation
|
(with-monad %store-monad
|
||||||
(packages->manifest
|
(return `(("profile" ,(profile
|
||||||
(delete-duplicates packages eq?)))))
|
(content (packages->manifest
|
||||||
(return `(("profile" ,profile)))))
|
(delete-duplicates packages eq?)))))))))
|
||||||
|
|
||||||
(define profile-service-type
|
(define profile-service-type
|
||||||
;; The service that populates the system's profile---i.e.,
|
;; The service that populates the system's profile---i.e.,
|
||||||
|
|
Reference in New Issue