From cc32729700caa4b76d112b561a09dd0ff3ada768 Mon Sep 17 00:00:00 2001 From: Mathieu Othacehe Date: Mon, 4 Apr 2022 16:38:09 +0200 Subject: [PATCH 2/2] 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. --- gnu/installer/user.scm | 9 ++------- 1 file changed, 2 insertions(+), 7 deletions(-) diff --git a/gnu/installer/user.scm b/gnu/installer/user.scm index c894a91dc8..b042c9790d 100644 --- a/gnu/installer/user.scm +++ b/gnu/installer/user.scm @@ -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)))) -- 2.34.0