diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2024-02-23 21:22:55 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2024-03-22 11:40:33 +0100 |
| commit | 29de2edfbbed21ac016f73a45d399795fc2e4dfb (patch) | |
| tree | 54db192b7526446c974cdb317d753694e32cd19b /gnu/home.scm | |
| parent | b5018807ee4b09962507b67f7506cbdc70d6c810 (diff) | |
system, home: Validate ‘services’ field value.
This guides newcomers who might stick a single (service …) form
in this field.
* gnu/services.scm (validate-service-list): New macro.
(%validate-service-list): New procedure.
* gnu/system.scm (<operating-system>)[services]: Add ‘sanitize’.
* gnu/home.scm (<home-environment>)[services]: Add ‘sanitize’.
Change-Id: I9e29bd9a078e87b627ab766fd669ba9de79f8473
Diffstat (limited to 'gnu/home.scm')
| -rw-r--r-- | gnu/home.scm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/gnu/home.scm b/gnu/home.scm index 2fefe7ba53..b390c8d534 100644 --- a/gnu/home.scm +++ b/gnu/home.scm @@ -1,6 +1,6 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2021 Andrew Tropin <andrew@trop.in> -;;; Copyright © 2022 Ludovic Courtès <ludo@gnu.org> +;;; Copyright © 2022, 2024 Ludovic Courtès <ludo@gnu.org> ;;; ;;; This file is part of GNU Guix. ;;; @@ -67,7 +67,8 @@ this-home-environment))) (services home-environment-user-services - (default '())) + (default '()) + (sanitize validate-service-list)) (location home-environment-location ; <location> (default (and=> (current-source-location) |