1 files changed, 41 insertions, 38 deletions
diff --git a/.config/guix/hati.scm b/.config/guix/hati.scm
index 04251b1..4967bde 100644
--- a/.config/guix/hati.scm
+++ b/.config/guix/hati.scm
@@ -14,8 +14,9 @@
   #:use-module (gnu services guix)
   #:use-module (guix gexp)
   #:use-module (modules base)
+  #:use-module (modules dwm)
+  #:use-module (modules utils)
   #:use-module (modules xorg)
-  #:use-module (modules mpd)
   #:use-module (modules ymir))
 
 
@@ -24,49 +25,51 @@
    (services
     `(,@bd-base-home-services
       ,@bd-desktop-home-services
+      ,@bd-dwm-home-services
       ,(service home-syncthing-service-type)))))
 
 
 (operating-system
- (inherit ymir)
- (host-name "hati")
+  (inherit ymir)
+  (host-name "hati")
 
- ;; (all packages are system wide)
- (packages
-  `(,@bd-base-system-packages
-    ,@bd-desktop-system-packages
-    ,@bd-mpd-package
+  ;; (all packages are system wide)
+  (packages
+   `(,@bd-base-system-packages
+     ,@bd-desktop-system-packages
+     ,@bd-dwm-system-packages
+     ,@bd-mpd-package
 
-    ;; machine-specific packages
-    ,@(list
-       xf86-video-nouveau)))
+     ;; machine-specific packages
+     ,@(list
+        xf86-video-nouveau)))
 
- (services
-  `(,@bd-base-system-services
-    ,@bd-desktop-system-services
-    ,@bd-mpd-service
-    ,(service guix-home-service-type
-              `((,username ,home)))))
+  (services
+   `(,@bd-base-system-services
+     ,@bd-desktop-system-services
+     ,@bd-mpd-service
+     ,(service guix-home-service-type
+               `((,username ,home)))))
 
- (mapped-devices (list (mapped-device
-                        (source (uuid "1e9c3cd7-97c2-411a-975a-40222d185563"))
-                        (target "hidden")
-                        (type luks-device-mapping))))
+  (mapped-devices (list (mapped-device
+                         (source (uuid "1e9c3cd7-97c2-411a-975a-40222d185563"))
+                         (target "hidden")
+                         (type luks-device-mapping))))
 
- (file-systems (cons* (file-system
-                       (mount-point "/boot/efi")
-                       (device (uuid
-                                "1448-51AE"
-                                'fat32))
-                       (type "vfat"))
-                      (file-system
-                       (mount-point "/home")
-                       (device "/dev/mapper/hidden")
-                       (type "ext4")
-                       (dependencies mapped-devices))
-                      (file-system
-                       (mount-point "/")
-                       (device (uuid
-                                "df334be4-5828-45b4-842a-9a8d97cfa40a"
-                                'ext4))
-                       (type "ext4")) %base-file-systems)))
+  (file-systems (cons* (file-system
+                         (mount-point "/boot/efi")
+                         (device (uuid
+                                  "1448-51AE"
+                                  'fat32))
+                         (type "vfat"))
+                       (file-system
+                         (mount-point "/home")
+                         (device "/dev/mapper/hidden")
+                         (type "ext4")
+                         (dependencies mapped-devices))
+                       (file-system
+                         (mount-point "/")
+                         (device (uuid
+                                  "df334be4-5828-45b4-842a-9a8d97cfa40a"
+                                  'ext4))
+                         (type "ext4")) %base-file-systems)))