mirror/guix
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2025-01-31 14:56:54 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

activation: Preserve /etc/groups upon reboots.

Browse source 
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:
Ludovic Courtès 2014-06-26 23:31:17 +02:00
parent c1202fb1f9
commit f01efec09a
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
guix/build/activation.scm
View file

@ -93,7 +93,7 @@ (define (activate-users+groups users groups)
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