1 files changed, 34 insertions(+), 11 deletions(-)

M home/modules/ruther/home/dwl/wm.scm

@@ 139,22 139,45 @@
                               (("%brightness%") #$brightness-script)
                               (("%printscreen%") #$printscreen-script)))))))))))
 
+(define xdg-data-dirs-package
+  (package
+    (name "xdg-data-dirs")
+    (version "0")
+    (source #f)
+    (build-system trivial-build-system)
+    (arguments
+     (list
+      #:builder #~(mkdir #$output)))
+    (native-search-paths
+     (list (search-path-specification
+            (variable "XDG_DATA_DIRS")
+            (files '("share")))))
+    (description "Get XDG_DATA_DIRS search path")
+    (synopsis "Get XDG_DATA_DIRS search path")
+    (home-page #f)
+    (license #f)))
+
 ;; Packages I use when in the WM, it's dependent on those.
 (define wm-packages
-  (specifications->manifest
-   '("brillo"
-     "wlr-randr"
-     "dwlmsg"
+  (concatenate-manifests
+   (list
+    (packages->manifest
+     (list
+      xdg-data-dirs-package))
+    (specifications->manifest
+     '("brillo"
+       "wlr-randr"
+       "dwlmsg"
 
-     ;; TODO make a proper service,
-     ;; replace in dwl with correct path to sequence detector
-     "sequence-detector"
-     "mpris-ctl"
+       ;; TODO make a proper service,
+       ;; replace in dwl with correct path to sequence detector
+       "sequence-detector"
+       "mpris-ctl"
 
-     "password-store-wl"
-     "pass-otp"
+       "password-store-wl"
+       "pass-otp"
 
-     "emacs-pgtk")))
+       "emacs-pgtk")))))
 
 (define dwl-mine-gexp
   (with-imported-modules '((guix build utils)