summaryrefslogtreecommitdiff
path: root/gnu/system/shadow.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2019-04-23 14:51:47 +0200
committerLudovic Courtès <ludo@gnu.org>2019-04-23 16:38:12 +0200
commit051b279fd08eec80cda248aa12e6875005b7dc4f (patch)
treec4765846c558489ac91e7c0db65640978aab145c /gnu/system/shadow.scm
parent95ef8b85b16f19557ea07d0d0cbf856f85657368 (diff)
services: account: Make 'user-homes' a one-shot service.
* gnu/system/shadow.scm (account-shepherd-service): Add 'one-shot?' field. Return #t from 'start'.
Diffstat (limited to 'gnu/system/shadow.scm')
-rw-r--r--gnu/system/shadow.scm5
1 files changed, 2 insertions, 3 deletions
diff --git a/gnu/system/shadow.scm b/gnu/system/shadow.scm
index 7dc36f4a451..13b8b140954 100644
--- a/gnu/system/shadow.scm
+++ b/gnu/system/shadow.scm
@@ -323,6 +323,7 @@ accounts among ACCOUNTS+GROUPS."
323 (list (shepherd-service 323 (list (shepherd-service
324 (requirement '(file-systems)) 324 (requirement '(file-systems))
325 (provision '(user-homes)) 325 (provision '(user-homes))
326 (one-shot? #t)
326 (modules '((gnu build activation) 327 (modules '((gnu build activation)
327 (gnu system accounts))) 328 (gnu system accounts)))
328 (start (with-imported-modules (source-module-closure 329 (start (with-imported-modules (source-module-closure
@@ -332,9 +333,7 @@ accounts among ACCOUNTS+GROUPS."
332 (activate-user-home 333 (activate-user-home
333 (map sexp->user-account 334 (map sexp->user-account
334 (list #$@(map user-account->gexp accounts)))) 335 (list #$@(map user-account->gexp accounts))))
335 #f))) ;stop 336 #t))) ;success
336 (stop #~(const #f))
337 (respawn? #f)
338 (documentation "Create user home directories.")))) 337 (documentation "Create user home directories."))))
339 338
340(define (shells-file shells) 339(define (shells-file shells)