From 3f4b86a2b880e63760b9c55446cf6d5f6350b757 Mon Sep 17 00:00:00 2001
From: Thanos Apollo <public@thanosapollo.org>
Date: Tue, 14 Jan 2025 21:04:28 +0200
Subject: guix: Update modules for new hostnames.

---
 guix/alexios.scm       | 22 ++++++++++++++++++++++
 guix/constantine.scm   | 27 +++++++++++++++++++++++++++
 guix/hermes.scm        | 22 ----------------------
 guix/system-create.scm |  6 +++---
 guix/zeus.scm          | 27 ---------------------------
 5 files changed, 52 insertions(+), 52 deletions(-)
 create mode 100644 guix/alexios.scm
 create mode 100644 guix/constantine.scm
 delete mode 100644 guix/hermes.scm
 delete mode 100644 guix/zeus.scm

diff --git a/guix/alexios.scm b/guix/alexios.scm
new file mode 100644
index 0000000..a6d28b1
--- /dev/null
+++ b/guix/alexios.scm
@@ -0,0 +1,22 @@
+
+(define-module (alexios)
+  #:use-module (gnu)
+  #:use-module (system-create))
+
+(use-package-modules file-systems)
+
+(system-create #:hostname "alexios"
+	       #:filesystem (cons* (file-system
+				    (mount-point "/boot/efi")
+				    (device (uuid "1F4A-0DF0"
+						  'fat32))
+				    (type "vfat"))
+				   (file-system
+				    (mount-point "/")
+				    (device (uuid
+					     "b4664996-7c96-4b8c-9fe7-26cda3021c9d"
+					     'ext4))
+				    (type "ext4"))
+				   %base-file-systems)
+	       #:swap-uuid "1b620436-7874-40d3-b580-7d2358a9f28e")
+
diff --git a/guix/constantine.scm b/guix/constantine.scm
new file mode 100644
index 0000000..a0674bf
--- /dev/null
+++ b/guix/constantine.scm
@@ -0,0 +1,27 @@
+
+(define-module (constantine)
+  #:use-module (gnu)
+  #:use-module (system-create))
+
+(use-package-modules file-systems)
+
+(system-create #:hostname "constantine"
+	       #:filesystem (cons* (file-system
+				     (mount-point "/hdd")
+				     (device (uuid "b0fddf60-47ff-469f-b135-8f6b58812c99"
+						   'xfs))
+				     (type "xfs"))
+				   (file-system
+				     (mount-point "/boot/efi")
+				     (device (uuid "D0B4-4407"
+						   'fat32))
+				     (type "vfat"))
+				   (file-system
+				     (mount-point "/")
+				     (device (uuid
+					      "ebc6d6e0-eecb-4ff6-8e1e-059a860dd30f"
+					      'ext4))
+				     (type "ext4"))
+				   %base-file-systems)
+	       #:swap-uuid "49859dc4-84ea-425e-9b83-12d1ca1bf65e"
+	       #:swapcaps? #f)
diff --git a/guix/hermes.scm b/guix/hermes.scm
deleted file mode 100644
index e2f1a17..0000000
--- a/guix/hermes.scm
+++ /dev/null
@@ -1,22 +0,0 @@
-
-(define-module (hermes)
-  #:use-module (gnu)
-  #:use-module (system-create))
-
-(use-package-modules file-systems)
-
-(system-create #:hostname "hermes"
-	       #:filesystem (cons* (file-system
-				    (mount-point "/boot/efi")
-				    (device (uuid "1F4A-0DF0"
-						  'fat32))
-				    (type "vfat"))
-				   (file-system
-				    (mount-point "/")
-				    (device (uuid
-					     "b4664996-7c96-4b8c-9fe7-26cda3021c9d"
-					     'ext4))
-				    (type "ext4"))
-				   %base-file-systems)
-	       #:swap-uuid "1b620436-7874-40d3-b580-7d2358a9f28e")
-
diff --git a/guix/system-create.scm b/guix/system-create.scm
index 212a7a7..6102105 100644
--- a/guix/system-create.scm
+++ b/guix/system-create.scm
@@ -81,7 +81,7 @@
 	     (service block-facebook-hosts-service-type)
 	     (simple-service 'add-extra-hosts
                              hosts-service-type
-                             (list (host "192.168.0.100" "zeus"
+                             (list (host "192.168.0.100" "constantine"
 					 '())
 				   (host "192.168.0.101" "uranus"
 					 '())))
@@ -130,8 +130,8 @@
 		       (cpu-boost-on-ac? #t)
 		       (wifi-pwr-on-bat? #t))))
 
-	    ;; Services specifics for zeus
-	    (if (string= hostname "zeus")
+	    ;; Services specifics for constantine
+	    (if (string= hostname "constantine")
 		(list
 		 (service oci-container-service-type
 			  (list
diff --git a/guix/zeus.scm b/guix/zeus.scm
deleted file mode 100644
index 4b248f6..0000000
--- a/guix/zeus.scm
+++ /dev/null
@@ -1,27 +0,0 @@
-
-(define-module (zeus)
-  #:use-module (gnu)
-  #:use-module (system-create))
-
-(use-package-modules file-systems)
-
-(system-create #:hostname "zeus"
-	       #:filesystem (cons* (file-system
-				     (mount-point "/hdd")
-				     (device (uuid "b0fddf60-47ff-469f-b135-8f6b58812c99"
-						   'xfs))
-				     (type "xfs"))
-				   (file-system
-				     (mount-point "/boot/efi")
-				     (device (uuid "D0B4-4407"
-						   'fat32))
-				     (type "vfat"))
-				   (file-system
-				     (mount-point "/")
-				     (device (uuid
-					      "ebc6d6e0-eecb-4ff6-8e1e-059a860dd30f"
-					      'ext4))
-				     (type "ext4"))
-				   %base-file-systems)
-	       #:swap-uuid "49859dc4-84ea-425e-9b83-12d1ca1bf65e"
-	       #:swapcaps? #f)
-- 
cgit v1.2.3