(use-modules (git oid)
	     (guix gexp)
	     (git bindings)
	     (git reference)
	     (git repository)
	     (guix packages)
	     (guix git-download)
	     (gnu packages check)
	     (gnu packages databases)
	     (gnu packages python-xyz)
	     (gnu packages python-web)
	     (guix build-system python)
	     (gnu packages python-check)
	     ((guix licenses) #:prefix license:))

(define %source-dir (dirname (current-filename)))

(libgit2-init!)
(define gnqc-py
  (let ((commit (oid->string
		 (reference-target
		  (repository-head (repository-open %source-dir)))))
	(revision "3"))
    (package
      (name "genenetwork-qc")
      (version (git-version "0.0.1" revision commit))
      (source (local-file %source-dir
			  "gnqc_py-checkout"
			  #:recursive? #t
			  #:select? (git-predicate %source-dir)))
      (build-system python-build-system)
      (arguments
       `(#:tests? #f ; Cannot start redis during `guix build'
	 #:phases
	 (modify-phases %standard-phases
	   (replace 'check
	     (lambda* (#:key tests? #:allow-other-keys)
	       (when tests?
		 (invoke "pytest")))))))
      (inputs
       (list python-mypy
	     python-pylint
	     python-pytest
	     python-hypothesis))
      (propagated-inputs
       (list redis
	     mariadb
	     gunicorn
	     python-redis
	     python-flask
	     python-jsonpickle
	     python-mysqlclient))
      (synopsis "GeneNetwork Quality Control Application")
      (description
       "GeneNetwork qc is a quality control application for the data files that
 eventually are used to add to the data in the GeneNetwork project.")
      (home-page "https://git.genenetwork.org/fredmanglis/gnqc_py")
      (license license:agpl3+))))

(libgit2-shutdown!)

gnqc-py