mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-11-07 07:26:13 -05:00
installer: user: Remove useless filtering.
* gnu/installer/user.scm (users->configuration): Remove root account filtering that is now performed in the "run-user-add-page" procedure.
This commit is contained in:
parent
2bfb27af56
commit
c2125e59d0
1 changed files with 2 additions and 7 deletions
|
@ -69,10 +69,5 @@ (define (user->sexp user)
|
|||
(supplementary-groups '("wheel" "netdev"
|
||||
"audio" "video"))))
|
||||
|
||||
`((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))))
|
||||
`((users (cons* ,@(map user->sexp users)
|
||||
%base-user-accounts))))
|
||||
|
|
Loading…
Reference in a new issue