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:
Mathieu Othacehe 2022-04-04 16:38:09 +02:00
parent 2bfb27af56
commit c2125e59d0
No known key found for this signature in database
GPG key ID: 8354763531769CA6

View file

@ -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))))