From 260a1c692b9c89b3c39854cb5d3a8c0dfc9afa77 Mon Sep 17 00:00:00 2001
From: Thanos Apollo <public@thanosapollo.org>
Date: Sun, 2 Jun 2024 08:07:57 +0300
Subject: guix:(system) Use system-create

---
 guix/zeus.scm | 41 +++++++++++++++++++++--------------------
 1 file changed, 21 insertions(+), 20 deletions(-)

(limited to 'guix/zeus.scm')

diff --git a/guix/zeus.scm b/guix/zeus.scm
index d436c54..4b248f6 100644
--- a/guix/zeus.scm
+++ b/guix/zeus.scm
@@ -1,26 +1,27 @@
 
 (define-module (zeus)
   #:use-module (gnu)
-  #:use-module (system-base))
+  #:use-module (system-create))
 
 (use-package-modules file-systems)
 
-(system-base "zeus"
-	     (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)
-	     "49859dc4-84ea-425e-9b83-12d1ca1bf65e")
+(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