From e03282e26a60f909b6dfce5a15f0bf1e81d8fe78 Mon Sep 17 00:00:00 2001 From: Marek Paśnikowski Date: Tue, 30 Jul 2024 12:44:05 +0200 Subject: refactor(systems): generalize the system definition name --- systems/ayase.scm | 4 ++-- systems/mcdowell.scm | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/systems/ayase.scm b/systems/ayase.scm index 838a88c..42f29f5 100644 --- a/systems/ayase.scm +++ b/systems/ayase.scm @@ -46,7 +46,7 @@ (list (uid1000-account supplementary-groups*)))) ;; record operating-system -(define-public ayase +(define-public operating-system* (let* ((bootloader-targets (list "/boot/efi")) (efi-filesystem-id (uuid "B4FB-CBD9" 'fat32)) (home-environments `((,uid1000-name ,(uid1000-home-environment host-name*)))) @@ -101,4 +101,4 @@ (services services) (sudoers-file %sudoers-specification*)))) -ayase +operating-system* diff --git a/systems/mcdowell.scm b/systems/mcdowell.scm index 759b0df..6f0c47f 100644 --- a/systems/mcdowell.scm +++ b/systems/mcdowell.scm @@ -27,7 +27,7 @@ (list (uid1000-account supplementary-groups*)))) ;; record operating-system -(define-public mcdowell +(define-public operating-system* (let* ((home-environments `((,uid1000-name ,(uid1000-home-environment host-name*)))) (guix-home (service guix-home-service-type @@ -49,4 +49,4 @@ locale* services*))) -mcdowell +operating-system* -- cgit v1.2.3