[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
03/06: services: profile: Use a declarative profile.
|
From: |
guix-commits |
|
Subject: |
03/06: services: profile: Use a declarative profile. |
|
Date: |
Sun, 26 Apr 2020 16:49:59 -0400 (EDT) |
civodul pushed a commit to branch master
in repository guix.
commit 45bd91334f6a932ed65576febd6e71888563cd8f
Author: Ludovic Courtès <address@hidden>
AuthorDate: Wed Apr 22 15:55:08 2020 +0200
services: profile: Use a declarative profile.
* gnu/services.scm (packages->profile-entry): Use 'profile' instead of
'profile-derivation'.
---
gnu/services.scm | 8 ++++----
1 file changed, 4 insertions(+), 4 deletions(-)
diff --git a/gnu/services.scm b/gnu/services.scm
index 126e081..ada6268 100644
--- a/gnu/services.scm
+++ b/gnu/services.scm
@@ -691,10 +691,10 @@ executables, making them setuid-root.")))
(define (packages->profile-entry packages)
"Return a system entry for the profile containing PACKAGES."
- (mlet %store-monad ((profile (profile-derivation
- (packages->manifest
- (delete-duplicates packages eq?)))))
- (return `(("profile" ,profile)))))
+ (with-monad %store-monad
+ (return `(("profile" ,(profile
+ (content (packages->manifest
+ (delete-duplicates packages eq?)))))))))
(define profile-service-type
;; The service that populates the system's profile---i.e.,
- branch master updated (1408e2a -> ccbc427), guix-commits, 2020/04/26
- 01/06: profiles: Add lowerable <profile> record type., guix-commits, 2020/04/26
- 03/06: services: profile: Use a declarative profile.,
guix-commits <=
- 04/06: pack: Use a declarative profile., guix-commits, 2020/04/26
- 02/06: system: 'operating-system-directory-base-entries' uses 'profile'., guix-commits, 2020/04/26
- 06/06: channels: Use a declarative profile., guix-commits, 2020/04/26
- 05/06: services: system: Initial entries are non-monadic., guix-commits, 2020/04/26