From ed818c66d371656c869f43d7a7cbbcfba2df647b Mon Sep 17 00:00:00 2001 From: Andrew Tropin Date: Wed, 15 Dec 2021 10:25:22 +0300 Subject: home: Add gexp-compiler for home-environments. MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit * gnu/home.scm (home-environment-compiler): New variable. Signed-off-by: Ludovic Courtès --- gnu/home.scm | 10 ++++++++++ 1 file changed, 10 insertions(+) (limited to 'gnu/home.scm') diff --git a/gnu/home.scm b/gnu/home.scm index d8134693e5..a9f0a469a5 100644 --- a/gnu/home.scm +++ b/gnu/home.scm @@ -25,6 +25,8 @@ #:use-module (gnu services) #:use-module (guix records) #:use-module (guix diagnostics) + #:use-module (guix gexp) + #:use-module (guix store) #:export (home-environment home-environment? @@ -104,3 +106,11 @@ of HOME-PROVENANCE-SERVICE-TYPE to its services." (inherit he) (services (cons (service home-provenance-service-type config-file) (home-environment-user-services he))))) + +(define-gexp-compiler (home-environment-compiler (he ) + system target) + ((store-lift + (lambda (store) + (run-with-store store (home-environment-derivation he) + #:system system + #:target target))))) -- cgit v1.2.3