diff options
| author | Andrew Tropin <andrew@trop.in> | 2024-05-22 13:49:37 +0400 |
|---|---|---|
| committer | Andrew Tropin <andrew@trop.in> | 2024-06-02 13:38:52 +0400 |
| commit | dbeef44f3c520816251bde74c1005915a637e1ef (patch) | |
| tree | 1acade4b0055a56491859f9221c5c8f0746b68f5 /gnu/services/guix.scm | |
| parent | fa7906d64881ee12e0c418136b44c73766e3d169 (diff) | |
| download | guix-dbeef44f3c520816251bde74c1005915a637e1ef.tar.gz guix-dbeef44f3c520816251bde74c1005915a637e1ef.zip | |
services: home: Use pairs instead of lists.
* gnu/services/guix.scm: Use pairs instead of lists.
* doc/guix.texi: Update accordingly.
* gnu/tests/guix.scm: Update accordingly.
Change-Id: I0b8d3fa5b214add89bdb84a11fa20d1b319435f0
Diffstat (limited to 'gnu/services/guix.scm')
| -rw-r--r-- | gnu/services/guix.scm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/gnu/services/guix.scm b/gnu/services/guix.scm index 96f5ecaac0..3818749baa 100644 --- a/gnu/services/guix.scm +++ b/gnu/services/guix.scm @@ -696,7 +696,7 @@ ca-certificates.crt file in the system profile." (define (guix-home-shepherd-service config) (map (match-lambda - ((user he) + (((? string? user) . (? home-environment? he)) (shepherd-service (documentation "Activate Guix Home.") (requirement '(user-processes)) @@ -710,7 +710,9 @@ ca-certificates.crt file in the system profile." (list (string-append "HOME=" (passwd:dir (getpw #$user))) "GUIX_SYSTEM_IS_RUNNING_HOME_ACTIVATE=t") #:group (group:name (getgrgid (passwd:gid (getpw #$user)))))) - (stop #~(make-kill-destructor))))) + (stop #~(make-kill-destructor)))) + (e (error "Invalid value for guix-home, it should be in a form of +(\"user-name\" . home-environment), but the following value is provided:\n" e))) config)) (define guix-home-service-type |