From f3197c8bfd8ec92bf3c2ad134b772d7790233c1b Mon Sep 17 00:00:00 2001
From: Marek Paśnikowski <marek@marekpasnikowski.pl>
Date: Thu, 23 May 2024 02:57:18 +0200
Subject: ayase: attempt another keyboard-layout definition

---
 systems/ayase/guix-ayase.org           | 7 +++++--
 systems/ayase/system-configuration.scm | 7 +++++--
 2 files changed, 10 insertions(+), 4 deletions(-)

diff --git a/systems/ayase/guix-ayase.org b/systems/ayase/guix-ayase.org
index 9fd2acc..f17f503 100644
--- a/systems/ayase/guix-ayase.org
+++ b/systems/ayase/guix-ayase.org
@@ -25,6 +25,9 @@
                  (device (uuid "B4FB-CBD9" 'fat32))
                  (type "vfat")))
 
+  (define keyboard
+    (keyboard-layout "pl"))
+
   (define marek-account
     (user-account (name "marek")
                   (comment "Marek Paśnikowski")
@@ -55,7 +58,7 @@
   (define bootloader
     (bootloader-configuration (bootloader grub-efi-bootloader)
                               (targets (list "/boot/efi"))
-                              (keyboard-layout (keyboard-layout "pl"))))
+                              (keyboard-layout keyboard)))
 
   (define main-swap
     (swap-space (target (uuid "cc6bbf7c-e42a-4ac3-a9ae-3b14d3b4b841"))))
@@ -74,7 +77,7 @@
   ;; PUBLIC
 
   (operating-system (bootloader bootloader)
-                    (keyboard-layout (keyboard-layout "pl"))
+                    (keyboard-layout keyboard)
                     (host-name "ayase")
                     (file-systems (append %base-file-systems
                                           ;; %distribution-file-systems
diff --git a/systems/ayase/system-configuration.scm b/systems/ayase/system-configuration.scm
index 933740a..840246b 100644
--- a/systems/ayase/system-configuration.scm
+++ b/systems/ayase/system-configuration.scm
@@ -15,6 +15,9 @@
                (device (uuid "B4FB-CBD9" 'fat32))
                (type "vfat")))
 
+(define keyboard
+  (keyboard-layout "pl"))
+
 (define marek-account
   (user-account (name "marek")
                 (comment "Marek Paśnikowski")
@@ -45,7 +48,7 @@
 (define bootloader
   (bootloader-configuration (bootloader grub-efi-bootloader)
                             (targets (list "/boot/efi"))
-                            (keyboard-layout (keyboard-layout "pl"))))
+                            (keyboard-layout keyboard)))
 
 (define main-swap
   (swap-space (target (uuid "cc6bbf7c-e42a-4ac3-a9ae-3b14d3b4b841"))))
@@ -64,7 +67,7 @@
 ;; PUBLIC
 
 (operating-system (bootloader bootloader)
-                  (keyboard-layout (keyboard-layout "pl"))
+                  (keyboard-layout keyboard)
                   (host-name "ayase")
                   (file-systems (append %base-file-systems
                                         ;; %distribution-file-systems
-- 
cgit v1.2.3