diff options
| author | Marek Paśnikowski <marek@marekpasnikowski.pl> | 2024-10-10 11:54:26 +0200 |
|---|---|---|
| committer | Marek Paśnikowski <marek@marekpasnikowski.pl> | 2024-10-10 11:54:26 +0200 |
| commit | 13713d63f1f19b39097589f34080c61a3095aa3f (patch) | |
| tree | c1a74c6b1fadf863ed454860ecc88e3509d6c2db /systems | |
| parent | 22395a26085421950eda442be9c036822eb0ca7e (diff) | |
refactor(mcdowell): isolate keyboard-layout-mcdowell
Diffstat (limited to 'systems')
| -rw-r--r-- | systems/mcdowell.scm | 11 |
1 files changed, 7 insertions, 4 deletions
diff --git a/systems/mcdowell.scm b/systems/mcdowell.scm index c7a418d..c1d53e0 100644 --- a/systems/mcdowell.scm +++ b/systems/mcdowell.scm @@ -34,6 +34,10 @@ (use-modules (suweren system)) %suweren-services) +(define keyboard-layout-mcdowell + ((@ (gnu system keyboard) keyboard-layout) + "pl")) + (define guix-home (service guix-home-service-type home-environments)) @@ -49,12 +53,11 @@ (define (operating-system*) (use-modules (machines portable-bios) (suweren system)) - (let* ((keyboard-layout* (keyboard-layout "pl")) - (timezone* "Europe/Warsaw")) + (let* ((timezone* "Europe/Warsaw")) ((@ (gnu system) operating-system) (kernel kernel*) - (bootloader (bootloader-configuration* keyboard-layout*)) - (keyboard-layout keyboard-layout*) + (keyboard-layout keyboard-layout-mcdowell) + (bootloader (bootloader-configuration* keyboard-layout-mcdowell)) (initrd initrd*) (firmware firmware*) (host-name host-name*) |