services: account: Make 'user-homes' a one-shot service.

* gnu/system/shadow.scm (account-shepherd-service): Add 'one-shot?'
field.  Return #t from 'start'.
This commit is contained in:
Ludovic Courtès 2019-04-23 14:51:47 +02:00
parent 95ef8b85b1
commit 051b279fd0
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 2 additions and 3 deletions

View File

@ -323,6 +323,7 @@ accounts among ACCOUNTS+GROUPS."
(list (shepherd-service (list (shepherd-service
(requirement '(file-systems)) (requirement '(file-systems))
(provision '(user-homes)) (provision '(user-homes))
(one-shot? #t)
(modules '((gnu build activation) (modules '((gnu build activation)
(gnu system accounts))) (gnu system accounts)))
(start (with-imported-modules (source-module-closure (start (with-imported-modules (source-module-closure
@ -332,9 +333,7 @@ accounts among ACCOUNTS+GROUPS."
(activate-user-home (activate-user-home
(map sexp->user-account (map sexp->user-account
(list #$@(map user-account->gexp accounts)))) (list #$@(map user-account->gexp accounts))))
#f))) ;stop #t))) ;success
(stop #~(const #f))
(respawn? #f)
(documentation "Create user home directories.")))) (documentation "Create user home directories."))))
(define (shells-file shells) (define (shells-file shells)