diff options
Diffstat (limited to 'systems/mcdowell.scm')
| -rw-r--r-- | systems/mcdowell.scm | 32 |
1 files changed, 19 insertions, 13 deletions
diff --git a/systems/mcdowell.scm b/systems/mcdowell.scm index 98c3b38..2641be5 100644 --- a/systems/mcdowell.scm +++ b/systems/mcdowell.scm @@ -24,7 +24,8 @@ (list uid1000-account)) ;; record operating-system -(define-public operating-system* +(define (operating-system*) + (use-modules (suweren system)) (let* ((home-environments `((,uid1000-name ,(uid1000-home-environment host-name*)))) (guix-home (service guix-home-service-type @@ -35,17 +36,22 @@ (timezone* "Europe/Warsaw") ;; (locale* "en_US.utf8") ) - (%suweren-operating-system kernel* - (bootloader-configuration* keyboard-layout*) - keyboard-layout* - initrd* - firmware* - host-name* - (file-systems* host-name*) - (swap-devices* host-name*) - users* - timezone* - ;; locale* - services*))) + ((@ (gnu system) operating-system) + (inherit %suweren-operating-system) + kernel* + (bootloader-configuration* keyboard-layout*) + keyboard-layout* + initrd* + firmware* + host-name* + (file-systems* host-name*) + (swap-devices* host-name*) + users* + timezone* + ;; locale* + services*))) + +(define-public operating-system* + (operating-system*)) operating-system* |