Change the way i reconfigure my system.

2 files changed, 7 insertions, 57 deletions

diff --git a/guix/jd/desktops/berserker.scm b/guix/jd/desktops/berserker.scm
index 37e7adc..3d6b0df 100755
--- a/guix/jd/desktops/berserker.scm
+++ b/guix/jd/desktops/berserker.scm
@@ -1,45 +1,17 @@
 (define-module (jd desktops berserker)
   #:use-module (jd desktops base)
   #:use-module (jd packages linux)
+  #:use-module (jd utils)
   #:use-module (gnu)
   #:use-module (gnu home))
 
-(define home
+(define-public home
   (home-environment
    (services %jd-base-home-services)))
 
-(define system
+(define-public system
   (operating-system
    (inherit odin-non-free)
    (kernel-loadable-modules (list xmm7360-pci))
-   (host-name "berserker")
+   (host-name "berserker")))
 
-   
-  (bootloader (bootloader-configuration
-                (bootloader grub-efi-bootloader)
-                (targets (list "/boot/efi"))))
-  (mapped-devices (list (mapped-device
-                          (source (uuid
-                                   "1f2b1bf2-89fe-4e2c-8b40-c460572bb776"))
-                          (target "crypthome")
-                          (type luks-device-mapping))))
-
-  (file-systems (cons* (file-system
-                         (mount-point "/")
-                         (device (uuid
-                                  "66396ba1-bda9-46bd-ab26-5edc46b437d6"
-                                  'ext4))
-                         (type "ext4"))
-                       (file-system
-                         (mount-point "/boot/efi")
-                         (device (uuid "482A-B117"
-                                       'fat32))
-                         (type "vfat"))
-                       (file-system
-                         (mount-point "/home")
-                         (device "/dev/mapper/crypthome")
-                         (type "ext4")
-                         (dependencies mapped-devices)) %base-file-systems))))
-
-
-(if (getenv "JD_HOME") home system)
diff --git a/guix/jd/desktops/mimir.scm b/guix/jd/desktops/mimir.scm
index 7d9823d..e5db0b7 100644
--- a/guix/jd/desktops/mimir.scm
+++ b/guix/jd/desktops/mimir.scm
@@ -3,34 +3,12 @@
   #:use-module (gnu)
   #:use-module (gnu home))
 
-(define home
+(define-public home
   (home-environment
    (services %jd-base-home-services)))
 
-(define system
+(define-public system
   (operating-system
    (inherit odin-non-free)
-   (host-name "mimir")
-
-   (bootloader (bootloader-configuration
-                (bootloader grub-efi-bootloader)
-                (targets (list "/boot/efi"))))
-
-   (swap-devices (list (swap-space
-                        (target (uuid
-                                 "5402ec34-85b8-4716-9c37-3d38c452ef98")))))
-
-   (file-systems (cons* (file-system
-                         (mount-point "/boot/efi")
-                         (device (uuid "1A88-DB36"
-                                       'fat32))
-                         (type "vfat"))
-                        (file-system
-                         (mount-point "/")
-                         (device (uuid
-                                  "640c44ea-125f-4410-a8de-3ec0fb3656c4"
-                                  'ext4))
-                         (type "ext4")) %base-file-systems))))
-
-(if (getenv "JD_HOME") home system)
+   (host-name "mimir")))