diff options
author | Ludovic Courtès <ludo@gnu.org> | 2019-04-23 14:51:47 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2019-04-23 16:38:12 +0200 |
commit | 051b279fd08eec80cda248aa12e6875005b7dc4f (patch) | |
tree | c4765846c558489ac91e7c0db65640978aab145c | |
parent | 95ef8b85b16f19557ea07d0d0cbf856f85657368 (diff) | |
download | guix-051b279fd08eec80cda248aa12e6875005b7dc4f.tar.gz |
services: account: Make 'user-homes' a one-shot service.
* gnu/system/shadow.scm (account-shepherd-service): Add 'one-shot?' field. Return #t from 'start'.
-rw-r--r-- | gnu/system/shadow.scm | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/gnu/system/shadow.scm b/gnu/system/shadow.scm index 7dc36f4a45..13b8b14095 100644 --- a/gnu/system/shadow.scm +++ b/gnu/system/shadow.scm @@ -323,6 +323,7 @@ accounts among ACCOUNTS+GROUPS." (list (shepherd-service (requirement '(file-systems)) (provision '(user-homes)) + (one-shot? #t) (modules '((gnu build activation) (gnu system accounts))) (start (with-imported-modules (source-module-closure @@ -332,9 +333,7 @@ accounts among ACCOUNTS+GROUPS." (activate-user-home (map sexp->user-account (list #$@(map user-account->gexp accounts)))) - #f))) ;stop - (stop #~(const #f)) - (respawn? #f) + #t))) ;success (documentation "Create user home directories.")))) (define (shells-file shells) |