.

packages/hyprland.scm

@@ -85,7 +85,6 @@ Wayland compositor based on wlroots") (description "Hyprland.")
      (sha256
       (base32 "17h8gy7wvsxg1ypq70b0cldz6h599xi7fibawlm2g6cvxkmzdwzh"))
      (modules '((guix build utils)))
-     (patches "hyprland-meson-build.patch")
      (snippet
       #~(begin
 	  ;;(delete-file-recursively "subprojects/wlroots")
@@ -114,7 +113,13 @@ Wayland compositor based on wlroots") (description "Hyprland.")
 		       (("/usr") "$out")))))))
    (build-system meson-build-system)
    (arguments
-    '(#:configure-flags '("-DNO_SYSTEMD=true")))
+    '(#:configure-flags
+      '("-DNO_SYSTEMD=true")
+      #:phases (modify-phases %standard-phases
+                              (add-before 'configure
+                                          'pre-configure
+                                          (lambda* (#:key outputs #:allow-other-keys)
+                                                   (system "patch . nix/patches/meson-build.patch"))))))
    (native-inputs
     (list gcc-13
 	  jq