From 96726345216be5240738d761b279c33fb83a475b Mon Sep 17 00:00:00 2001 From: Marek Paśnikowski Date: Mon, 7 Oct 2024 16:16:36 +0200 Subject: refactor(izumi): isolate (users-ayase) --- systems/izumi/izumi.scm | 16 +++++++++++++--- 1 file changed, 13 insertions(+), 3 deletions(-) (limited to 'systems/izumi') diff --git a/systems/izumi/izumi.scm b/systems/izumi/izumi.scm index 65126f8..5d847df 100644 --- a/systems/izumi/izumi.scm +++ b/systems/izumi/izumi.scm @@ -74,6 +74,18 @@ (define hosts-izumi (local-file "system-files/hosts")) +;;;??????????????????????????????????????????????????????????????????? + +(define (users-ayase) + (use-modules (gnu system shadow) + (users id1000) + (users vmail)) + (append %base-user-accounts + (list uid1000-account + vmail-account))) + +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; + (define (operating-system-izumi) (operating-system ( bootloader @@ -460,9 +472,7 @@ ( swap-space ( target "/dev/sda3" ) ) ) ) ( timezone "Europe/Warsaw" ) - (users (append (@ (gnu system shadow) %base-user-accounts) - (list (@ (users vmail) vmail-account) - (@ (users id1000) uid1000-account)))))) + (users (users-ayase)))) (define-public operating-system-izumi (operating-system-izumi)) -- cgit v1.2.3