aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--.guix-channel21
-rw-r--r--.guix/genenetwork3-package.scm19
l---------[-rw-r--r--]guix.scm40
3 files changed, 41 insertions, 39 deletions
diff --git a/.guix-channel b/.guix-channel
new file mode 100644
index 0000000..222b451
--- /dev/null
+++ b/.guix-channel
@@ -0,0 +1,21 @@
+;; This file lets us present this repo as a Guix channel.
+
+(channel
+ (version 0)
+ (directory ".guix")
+ (dependencies
+ (channel
+ (name guix-bioinformatics)
+ (url "https://gitlab.com/genenetwork/guix-bioinformatics.git"))
+ ;; FIXME: guix-bioinformatics depends on guix-past. So, there
+ ;; should be no reason to explicitly depend on guix-past. But, the
+ ;; channel does not build otherwise. This is probably a guix bug.
+ (channel
+ (name guix-past)
+ (url "https://gitlab.inria.fr/guix-hpc/guix-past")
+ (introduction
+ (channel-introduction
+ (version 0)
+ (commit "0c119db2ea86a389769f4d2b9c6f5c41c027e336")
+ (signer
+ "3CE4 6455 8A84 FDC6 9DB4 0CFB 090B 1199 3D9A EBB5"))))))
diff --git a/.guix/genenetwork3-package.scm b/.guix/genenetwork3-package.scm
new file mode 100644
index 0000000..9833213
--- /dev/null
+++ b/.guix/genenetwork3-package.scm
@@ -0,0 +1,19 @@
+(define-module (genenetwork3-package)
+ #:use-module ((gn packages genenetwork)
+ #:select (genenetwork3) #:prefix gn:)
+ #:use-module (guix gexp)
+ #:use-module (guix utils)
+ #:use-module (guix git-download)
+ #:use-module (guix packages))
+
+(define-public genenetwork3
+ (package
+ (inherit gn:genenetwork3)
+ (version (string-append (package-version gn:genenetwork3) "-git"))
+ (source (local-file ".."
+ "genenetwork3-checkout"
+ #:recursive? #t
+ #:select? (or (git-predicate (dirname (current-source-directory)))
+ (const #t))))))
+
+genenetwork3
diff --git a/guix.scm b/guix.scm
index c46e884..bd2235c 100644..120000
--- a/guix.scm
+++ b/guix.scm
@@ -1,39 +1 @@
-;;; guix.scm --- genenetwork3 rest Api guix bootstrapping file.
-;;;
-;;; Copyright © 2021 Bonface Munyoki Kilyungi <me@bonfacemunyoki.com>
-;;;
-;;; This file is part of genenetwork3.
-;;;
-;;; genenetwork3 is free software: you can redistribute it and/or
-;;; modify it under the terms of the GNU General Public License as
-;;; published by the Free Software Foundation; either version 3 of the
-;;; License, or (at your option) any later version.
-;;;
-;;; sheepdog is distributed in the hope that it will be useful, but
-;;; WITHOUT ANY WARRANTY; without even the implied warranty of
-;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
-;;; General Public License for more details.
-;;;
-;;; You should have received a copy of the GNU General Public License
-;;; along with genenetwork3. If not, see https://www.gnu.org/licenses/.
-
-;; Make sure you have the
-;; https://git.genenetwork.org/guix-bioinformatics/guix-bioinformatics channel
-;; set up.
-;;
-;; To get a development container (e.g., run in emacs shell).
-;;
-;; guix shell -C -Df guix.scm
-
-(use-modules (gn packages genenetwork)
- (guix gexp)
- (guix git-download)
- (guix packages))
-
-(define %source-dir (dirname (current-filename)))
-
-(package
- (inherit genenetwork3)
- (source (local-file %source-dir "genenetwork3-checkout"
- #:recursive? #t
- #:select? (git-predicate %source-dir))))
+.guix/genenetwork3-package.scm \ No newline at end of file