move dwm files to separate directory

1 files changed, 77 insertions, 0 deletions

diff --git a/.config/guix/graveyard/kvasir.scm b/.config/guix/graveyard/kvasir.scm
new file mode 100644
index 0000000..b04f3e3
--- /dev/null
+++ b/.config/guix/graveyard/kvasir.scm
@@ -0,0 +1,77 @@
+(define-module (kvasir)
+  #:use-module (gnu)
+  #:use-module (gnu home)
+  #:use-module (gnu home services)
+  #:use-module (gnu home services dotfiles)
+  #:use-module (gnu image)
+  #:use-module (gnu packages)
+  #:use-module (gnu packages linux)
+  #:use-module (gnu services)
+  #:use-module (gnu services guix)
+  #:use-module (gnu system image)
+  #:use-module (guix gexp)
+  #:use-module (modules base)
+  #:use-module (modules dwm)
+  #:use-module (modules pdf)
+  #:use-module (modules xorg)
+  #:use-module (modules ymir))
+
+;;; Commentary:
+;;;
+;;; kvasir is a bootable usb
+;;;
+;;; Code:
+
+(define home
+  (home-environment
+   (services
+    `(,@bd-base-home-services
+      ,@bd-desktop-home-services
+      ,@bd-pdf-services
+      ,@bd-dwm-home-services
+      ,(service home-dotfiles-service-type
+                (home-dotfiles-configuration
+                 (directories '("/home/bdunahu/.dotfiles"))))))))
+
+
+(define system
+  (operating-system
+   (inherit ymir)
+   (host-name "kvasir")
+
+
+   ;; (all packages are system wide)
+   (packages
+    `(,@bd-base-system-packages
+      ,@bd-dwm-system-packages
+      ,@bd-desktop-system-packages
+
+      ;; machine-specific packages
+      ,@(list
+         brightnessctl)))
+
+   (services
+    `(,@bd-base-system-services
+      ,@bd-desktop-system-services
+      ,(service guix-home-service-type
+                `((,username ,home)))))
+
+
+   (file-systems (cons* (file-system
+                         (mount-point "/boot/efi")
+                         (device (uuid
+                                  "8A13-7018"
+                                  'fat32))
+                         (type "vfat"))
+                        (file-system
+                         (mount-point "/")
+                         (device (uuid
+                                  "69a3593b-12bd-40ad-a932-007674a8cfe8"))
+                         (type "ext4")) %base-file-systems))))
+
+(image
+ (inherit iso9660-image)
+ (operating-system system))
+
+
+;;; kvasir.scm ends here