1 files changed, 38 insertions(+), 1 deletions(-)

M ruther/packages/wayland.scm

@@ 3,6 3,7 @@
   #:use-module (guix packages)
   #:use-module (guix gexp)
 
+  #:use-module (gnu packages build-tools)
   #:use-module (gnu packages)
   #:use-module (gnu packages xdisorg)
   #:use-module (gnu packages gl)


@@ 13,6 14,7 @@
   #:use-module (gnu packages gtk)
   #:use-module (gnu packages glib)
 
+  #:use-module ((guix build-system gnu) #:prefix gnu:)
   #:use-module ((guix build-system meson) #:prefix meson:)
   #:use-module ((guix build-system python) #:prefix python:)
   #:use-module ((guix licenses) #:prefix license:)


@@ 192,4 194,39 @@
         (base32 "1wsql3zs0mjndxzhbx84nkimls66l6zql79rb74lghlkwaajzaq9"))))
     (inputs (list wlroots-0.19-dev))))
 
-;; TODO dwl 0.8 dev
+(define-public dwlmsg
+  (package
+   (name "dwlmsg")
+   (version "0.0.0")
+   (source
+    (origin
+     (method git-fetch)
+     (uri (git-reference
+           (url "https://codeberg.org/notchoc/dwlmsg.git")
+           (commit "7c9479b05b1ef4c351ddb646308321036bb1db33")))
+     (sha256
+      (base32 "1j1x51i698fs1iw7brd7mabpvh8y8i4a3g4vyd7hl024q75jwc9n"))))
+   (build-system gnu:gnu-build-system)
+   (inputs
+    (list wayland-1.23 wayland-protocols-1.35))
+   (native-inputs
+    (list pkg-config))
+   (arguments
+    (list
+     #:tests? #f
+     #:make-flags
+     `(list
+       (string-append "CC=" ,(cc-for-target))
+       (string-append "PREFIX=" (assoc-ref %outputs "out")))
+     #:phases
+     #~(modify-phases %standard-phases
+         (delete 'configure)
+         (replace 'install
+           (lambda* (#:key (make-flags '()) #:allow-other-keys)
+             (mkdir-p (string-append #$output "/bin"))
+             (apply invoke "make" "install" make-flags))))))
+   (synopsis "Send commands to dwl with ipc patch")
+   (description "After patching with ipc, this tools allows
+for messaging with dwl. There are control commands and build commands")
+   (license #f)
+   (home-page "https://codeberg.org/notchoc/dwlmsg")))