summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--systems/mcdowell.scm11
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*)