(define-module (home dwl wm)
  #:use-module (guix packages)
  #:use-module (guix gexp)
  #:use-module (guix utils)
  #:use-module (ruther packages wayland)
  #:use-module (guix download)
  #:use-module (guix git-download))

(define-public dwl-mine
  (package
    (inherit dwl-0.7)
    (name "dwl-mine")
    (source
     (origin
       (method git-fetch)
       (uri (git-reference
        (url "https://github.com/Rutherther/dwl")
        (commit "a8e46f319f574876ce697a7097eb47a2080b1a87")))
       (sha256
        (base32 "1jkyqwnc6x48bcjcyn1ha69vwql18ib1w47jx6bxz7wg7bvidm01"))))
    (arguments (substitute-keyword-arguments (package-arguments dwl-0.7)
                 ((#:phases original-phases)
                  #~(modify-phases #$original-phases
                      (add-after 'unpack 'add-config
                        (lambda _
                          (copy-file #$(local-file "config.h") "config.h")))))))))