(use-modules (gnu packages autotools)
             (gnu packages base)
             (gnu packages guile)
             (gnu packages guile-xyz)
             (gnu packages rsync)
             (guix git-download)
             (guix packages)
             (guix profiles)
             (guix utils))

(define haunt*
  (let ((commit "d979ed3a1e50f0d73f204076092cb8e4fa033c72"))
    (package
     (inherit haunt)
     (source (origin
              (method git-fetch)
              (uri (git-reference
                    (url "https://git.dthompson.us/haunt.git")
                    (commit commit)))
              (sha256
               (base32
                "1l3c109sx76hzdcfakchskpyhdw3v6zwjs8zdhymbkbks85zwyb5"))))
     (native-inputs
      `(("autoconf" ,autoconf)
        ("automake" ,automake)
        ,@(package-native-inputs haunt)))
     (arguments
      (substitute-keyword-arguments (package-arguments haunt)
        ((#:phases phases)
         `(modify-phases ,phases
            (add-after 'unpack 'bootstrap
              (lambda _
                (invoke "sh" "bootstrap"))))))))))

(packages->manifest
 (list glibc
       glibc-utf8-locales
       gnu-make
       guile-3.0
       guile-syntax-highlight
       haunt*
       rsync))