(define-module (xyz euandreh packages)
  #:use-module (json)
  #:use-module ((ice-9 textual-ports) #:prefix textual-ports:)
  #:use-module ((guix licenses) #:prefix license:)
  #:use-module (gnu packages)
  #:use-module (guix transformations)
  #:use-module (guix gexp)
  #:use-module (guix packages)
  #:use-module (guix download)
  #:use-module (guix git-download)
  #:use-module (guix utils)
  #:use-module (guix store)
  #:use-module (guix build-system gnu))

(define-public td-latest
  (package
    (name "td-latest")
    (version "707bb2080c35944b14da57f13310c4bad61259fe")
    (source (origin
              (method url-fetch)
              (uri (string-append
                    "https://euandreh.xyz/td.git/snapshot/td-"
                    version
                    ".tar.gz"))
              (sha256
               (base32
                "0qz037cx50zkfjlwk0f9n16ni3j5q328xydml4dw01l6nv9p4pnj"))))
    (build-system gnu-build-system)
    (inputs
     `(("m4" ,(specification->package "m4"))))
    (arguments `(#:make-flags
                 (list (string-append "PREFIX=" %output))
                 #:phases
                 (modify-phases %standard-phases
                   (delete 'configure))))
    (synopsis (file-append source "/description"))
    (description (file-append source "/long-description"))
    (home-page (string-append "https://" name ".euandreh.xyz"))
    (license license:agpl3+)))

(list
 td-latest)