guix
/
guix
mirror of git://git.savannah.gnu.org/guix.git
3
4
Fork 0
Code Issues Releases Wiki Activity

Revert "installer: user: Remove useless filtering." 

This reverts commit c2125e59d0.

Fixes <https://issues.guix.gnu.org/55361>.
This commit is contained in:
Ludovic Courtès 2022-05-20 20:41:02 +02:00
parent dd19b191d6
commit 48c748226e
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
gnu/installer/user.scm
View File

@ -69,5 +69,10 @@
(supplementary-groups '("wheel" "netdev"
"audio" "video"))))
`((users (cons* ,@(map user->sexp users)
%base-user-accounts))))
`((users (cons*
,@(filter-map (lambda (user)
;; Do not emit a 'user-account' form for "root".
(and (not (string=? (user-name user) "root"))
(user->sexp user)))
users)
%base-user-accounts))))