summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMarek Paśnikowski <marekpasnikowski@protonmail.com>2022-10-31 09:53:59 +0100
committerMarek Paśnikowski <marekpasnikowski@protonmail.com>2022-10-31 09:53:59 +0100
commitb6de8a22a2b32c08bc53dd802c153def9acb773b (patch)
tree0ac51b6f70f34cf31756feee4614f552ea83772d
parent6efef6e224502ab42055dbe0bb5b6146d97a92b6 (diff)
System configuration: break out users
-rw-r--r--system-configuration.scm21
1 files 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"