Cleanup guix definitions in preparation for deployment.

1 files changed, 57 insertions, 0 deletions

diff --git a/.guix/modules/gnqc-py.scm b/.guix/modules/gnqc-py.scm
new file mode 100644
index 0000000..4ff86b5
--- /dev/null
+++ b/.guix/modules/gnqc-py.scm
@@ -0,0 +1,57 @@
+(define-module (gnqc-py)
+  #:use-module (guix)
+  #:use-module (guix gexp)
+  #:use-module (guix packages)
+  #:use-module (guix git-download)
+  #:use-module ((guix licenses) #:prefix license:)
+
+  #:use-module (gnu packages check)
+  #:use-module (gnu packages databases)
+  #:use-module (gnu packages python-xyz)
+  #:use-module (gnu packages python-web)
+  #:use-module (guix build-system python)
+  #:use-module (gnu packages python-check))
+
+(define %source-dir (dirname (dirname (current-source-directory))))
+
+(define vcs-file?
+  (or (git-predicate %source-dir)
+      (const #t)))
+
+(define gnqc-py
+  (package
+    (name "gnqc-py")
+    (version "0.0.1")
+    (source (local-file "../.."
+			"gnqc-py-checkout"
+			#:recursive? #t
+			#:select? vcs-file?))
+    (build-system python-build-system)
+    (arguments
+     (list
+      #:phases
+      #~(modify-phases %standard-phases
+	  (replace 'check
+	    (lambda* (#:key tests? #:allow-other-keys)
+	      (when tests?
+		(invoke "pytest" "-k" "unit_test")))))))
+    (native-inputs
+     (list python-mypy
+	   python-pylint
+	   python-pytest
+	   python-hypothesis))
+    (propagated-inputs
+     (list gunicorn
+	   python-redis
+	   python-flask
+	   python-pyyaml
+	   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://gitlab.com/fredmanglis/gnqc_py")
+    (license license:agpl3+)))
+
+gnqc-py