(define-module (guixpkgs midizap)
  #:use-module ((guix licenses) #:prefix license:)
  #:use-module (guix build-system gnu)
  #:use-module (guix packages)
  #:use-module (guix git-download)
  #:use-module (gnu packages xorg)
  #:use-module (gnu packages audio)
  #:use-module (guix gexp))

(define-public midizap
  (package
    (name "midizap")
    (version "0.8")
    (source
     (local-file "." "midizap" #:recursive? #t)
     ;; (origin
     ;;   (method git-fetch)
     ;;   (uri (git-reference
     ;; 	     (url "https://github.com/agraef/midizap.git")
     ;; 	     (commit version)))
     ;;   (sha256
     ;; 	(base32
     ;; 	 "0y31fnffl31n9lpkiw1dc3q4rnpfnras30n9y2h5j6586dkmgni4")))
     )
    (arguments
     `(#:tests? #f 			; no check target
       #:make-flags
       (list "CC=gcc"
	     (string-append "DESTDIR=" %output)
	     "prefix=")
       #:phases
       (modify-phases %standard-phases
	 (replace 'configure
           (lambda* (#:key inputs outputs #:allow-other-keys)
             (substitute* "Makefile"
               (("/usr/include/X11/")
                (string-append (assoc-ref inputs "xorgproto") "/include/X11/"))
	       (("-lXtst") "-lXtst -ljack"))
             #t)))))
    ;; (native-inputs `(("pkg-config" ,pkg-config)))
    (inputs `(("jack" ,jack-1)
	      ("libx11" ,libx11)
	      ("libxtst" ,libxtst)
	      ("xorgproto" ,xorgproto)))
    (build-system gnu-build-system)
    (home-page "")
    (synopsis "")
    (description "")
    (license license:gpl2+)))

midizap