From 8cf16a7346af6fc27efdc2a0835b9ea8da769e4e Mon Sep 17 00:00:00 2001
From: Marek Paśnikowski <marek@marekpasnikowski.pl>
Date: Sat, 25 May 2024 17:31:55 +0200
Subject: change abstraction of ayase swap-space

---
 systems/ayase/system-configuration.scm | 20 +++++++++-----------
 1 file changed, 9 insertions(+), 11 deletions(-)

diff --git a/systems/ayase/system-configuration.scm b/systems/ayase/system-configuration.scm
index c88c2e2..6cd0082 100644
--- a/systems/ayase/system-configuration.scm
+++ b/systems/ayase/system-configuration.scm
@@ -25,10 +25,7 @@
 (define root-uuid
   "615a98cd-a632-4ee5-a6f4-e5ebcaa6fb8c")
 
-(define swap-uuid
-  "cc6bbf7c-e42a-4ac3-a9ae-3b14d3b4b841")
-
-;; ABSTRACTION 2
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
 (define efi-partition
   (file-system (mount-point "/boot/efi")
@@ -50,7 +47,10 @@
                (device (uuid root-uuid 'ext4))
                (type root-filesystem)))
 
-;; ABSTRACTION 1
+(define swap-space-target
+  (uuid "cc6bbf7c-e42a-4ac3-a9ae-3b14d3b4b841"))
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
 (define ayase-file-systems
   (list root-partition
@@ -59,8 +59,11 @@
 (define ayase-user-accounts
   (list marek-account))
 
+(define keyboard-layout
+  (keyboard-layout "pl"))
+
 (define main-swap
-  (swap-space (target (uuid swap-uuid))))
+  (swap-space (target swap-space-target)))
 
 (define system-packages
   (map specification->package
@@ -73,11 +76,6 @@
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
-(define keyboard-layout
-  (keyboard-layout "pl"))
-
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-
 (define bootloader
   (bootloader-configuration (bootloader grub-efi-bootloader)
                             (targets bootloader-targets)
-- 
cgit v1.2.3