diff options
author | Marek Paśnikowski <marekpasnikowski@protonmail.com> | 2022-10-31 09:53:59 +0100 |
---|---|---|
committer | Marek Paśnikowski <marekpasnikowski@protonmail.com> | 2022-10-31 09:53:59 +0100 |
commit | b6de8a22a2b32c08bc53dd802c153def9acb773b (patch) | |
tree | 0ac51b6f70f34cf31756feee4614f552ea83772d /system-configuration.scm | |
parent | 6efef6e224502ab42055dbe0bb5b6146d97a92b6 (diff) |
System configuration: break out users
Diffstat (limited to 'system-configuration.scm')
-rw-r--r-- | system-configuration.scm | 21 |
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" |