From b6de8a22a2b32c08bc53dd802c153def9acb773b Mon Sep 17 00:00:00 2001 From: Marek Paśnikowski Date: Mon, 31 Oct 2022 09:53:59 +0100 Subject: System configuration: break out users --- system-configuration.scm | 21 ++++++++++++--------- 1 file changed, 12 insertions(+), 9 deletions(-) diff --git a/system-configuration.scm b/system-configuration.scm index 1bf2d17..4511332 100644 --- a/system-configuration.scm +++ b/system-configuration.scm @@ -19,19 +19,22 @@ (define host-name "aisaka") +(define users + (cons* (user-account (name "marek") + (comment "Marek Paśnikowski") + (group "users") + (home-directory "/home/marek") + (supplementary-groups '("wheel" + "netdev" + "audio" + "video"))) + %base-user-accounts)) + (operating-system (locale locale) (timezone timezone) (keyboard-layout keyboard-layout) (host-name host-name) - (users (cons* (user-account (name "marek") - (comment "Marek Paśnikowski") - (group "users") - (home-directory "/home/marek") - (supplementary-groups '("wheel" - "netdev" - "audio" - "video"))) - %base-user-accounts)) + (users users) (packages (append (map (compose list specification->package+output) '("guile-spec" -- cgit v1.2.3