diff options
author | Marek Paśnikowski <marek@marekpasnikowski.pl> | 2024-11-20 05:43:13 +0100 |
---|---|---|
committer | Marek Paśnikowski <marek@marekpasnikowski.pl> | 2024-11-20 05:43:13 +0100 |
commit | debd2aea3d6bb4466b8efe73a456ff5aaa2b5292 (patch) | |
tree | ea49dbb6e7c3572bc18fee0196670e65ed4496b6 /systems | |
parent | 663c6f22899c2326845d55a989869e83a6e4f644 (diff) |
refactor(ayase): modernize (users id1000) import
Diffstat (limited to 'systems')
-rw-r--r-- | systems/ayase.scm | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/systems/ayase.scm b/systems/ayase.scm index 65414f9..faf0257 100644 --- a/systems/ayase.scm +++ b/systems/ayase.scm @@ -14,7 +14,8 @@ #:prefix suweren:services:) #:use-module ((suweren system) #:prefix suweren:system:) - #:use-module (users id1000)) + #:use-module ((users id1000) + #:prefix users:id1000:)) (define efi-filesystem-uuid ((@ (gnu system uuid) uuid) @@ -60,10 +61,10 @@ (define (home-services) (use-modules (gnu services guix)) - (let ((uid1000-home-environment* (uid1000-home-environment host-name))) + (let ((uid1000-home-environment* (users:id1000:uid1000-home-environment host-name))) ((@ (gnu services) service) guix-home-service-type - `((,uid1000-name ,uid1000-home-environment*))))) + `((,users:id1000:uid1000-name ,uid1000-home-environment*))))) (define keyboard-layout ((@ (gnu system keyboard) keyboard-layout) @@ -147,7 +148,7 @@ (define (users) (use-modules (gnu system accounts)) (append (@ (gnu system shadow) %base-user-accounts) - (list uid1000-account))) + (list users:id1000:uid1000-account))) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |