activation: Only create groups that do not exist yet. Before that the effect would be to re-create groups at each boot, and thus remove any members of the groups. * guix/build/activation.scm (activate-users+groups): Call 'add-group' only when (getgrname name) fails.
1 files changed, 2 insertions(+), 1 deletions(-) M guix/build/activation.scm
M guix/build/activation.scm => guix/build/activation.scm +2 -1
@@ 126,7 126,8 @@ numeric gid or #f." ;; Then create the groups. (for-each (match-lambda ((name password gid) (add-group name #:gid gid #:password password))) (unless (false-if-exception (getgrnam name)) (add-group name #:gid gid #:password password)))) groups) ;; Finally create the other user accounts.