activation: Preserve /etc/groups upon reboots.
This is a followup to e2fcc23
. The /etc/group file would be cleared
when booting.
* guix/build/activation.scm (activate-users+groups)[touch]: Rewrite so
it does not wipe out FILE's contents.
This commit is contained in:
parent
c1202fb1f9
commit
f01efec09a
|
@ -93,7 +93,7 @@ Each item in USERS is a list of all the characteristics of a user account;
|
||||||
each item in GROUPS is a tuple with the group name, group password or #f, and
|
each item in GROUPS is a tuple with the group name, group password or #f, and
|
||||||
numeric gid or #f."
|
numeric gid or #f."
|
||||||
(define (touch file)
|
(define (touch file)
|
||||||
(call-with-output-file file (const #t)))
|
(close-port (open-file file "a0b")))
|
||||||
|
|
||||||
(define activate-user
|
(define activate-user
|
||||||
(match-lambda
|
(match-lambda
|
||||||
|
|
Loading…
Reference in New Issue