[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
07/14: home-services: Add home-provenance-service-type.
From: |
guix-commits |
Subject: |
07/14: home-services: Add home-provenance-service-type. |
Date: |
Fri, 27 Aug 2021 15:08:30 -0400 (EDT) |
wigust pushed a commit to branch wip-guix-home
in repository guix.
commit 46c090b507ef2cc6c1c742f9e916ccb6a7338768
Author: Andrew Tropin <andrew@trop.in>
AuthorDate: Thu Aug 5 08:46:58 2021 +0300
home-services: Add home-provenance-service-type.
* gnu/home-services.scm (home-provenance-service-type,
sexp->home-provenance,
home-provenance): New variables.
Signed-off-by: Oleg Pykhalov <go.wigust@gmail.com>
---
gnu/home-services.scm | 27 ++++++++++++++++++++++++++-
1 file changed, 26 insertions(+), 1 deletion(-)
diff --git a/gnu/home-services.scm b/gnu/home-services.scm
index 32b59f5..d320d3a 100644
--- a/gnu/home-services.scm
+++ b/gnu/home-services.scm
@@ -38,7 +38,10 @@
home-files-service-type
home-run-on-first-login-service-type
home-activation-service-type
- home-run-on-change-service-type)
+ home-run-on-change-service-type
+ home-provenance-service-type
+
+ fold-home-service-types)
#:re-export (service
service-type
@@ -467,3 +470,25 @@ G-expressions to run if the specified files have changed
since the
last generation. The extension should be a list of lists where the
first element is the pattern for file or directory that expected to be
changed, and the second element is the G-expression to be evaluated.")))
+
+
+;;;
+;;; Provenance tracking.
+;;;
+
+(define home-provenance-service-type
+ (service-type
+ (name 'home-provenance)
+ (extensions
+ (list (service-extension
+ home-service-type
+ (service-extension-compute
+ (first (service-type-extensions provenance-service-type))))))
+ (default-value #f) ;the HE config file
+ (description "\
+Store provenance information about the home environment in the home
+environment itself: the channels used when building the home
+environment, and its configuration file, when available.")))
+
+(define sexp->home-provenance sexp->system-provenance)
+(define home-provenance system-provenance)
- branch wip-guix-home created (now f82a0ac), guix-commits, 2021/08/27
- 03/14: gnu: emacs-org-appear: Update to 0.2.4., guix-commits, 2021/08/27
- 01/14: gnu: python-duniterpy: Update to 1.0.0., guix-commits, 2021/08/27
- 06/14: home-services: Add home-run-on-change-service-type., guix-commits, 2021/08/27
- 04/14: gnu: emacs-elfeed-score: Update to 0.8.4., guix-commits, 2021/08/27
- 08/14: home-services: Add fold-home-service-types function., guix-commits, 2021/08/27
- 10/14: home-services: Add fontutils., guix-commits, 2021/08/27
- 05/14: home-services: Add most essential home services., guix-commits, 2021/08/27
- 07/14: home-services: Add home-provenance-service-type.,
guix-commits <=
- 11/14: home-services: Add helper functions for service configurations., guix-commits, 2021/08/27
- 12/14: home-services: Add shells., guix-commits, 2021/08/27
- 13/14: home-services: Add xdg., guix-commits, 2021/08/27
- 02/14: ci: Add jobs history support., guix-commits, 2021/08/27
- 09/14: home-services: Add symlink-manager., guix-commits, 2021/08/27
- 14/14: home: Add home-environment., guix-commits, 2021/08/27