aboutsummaryrefslogtreecommitdiff
path: root/genenetwork
diff options
context:
space:
mode:
authorArun Isaac2022-06-29 19:38:43 +0530
committerArun Isaac2022-06-29 19:38:43 +0530
commitf938b66e0d7404cc88c77008f90783c9df7cff83 (patch)
treee8cdbd4f81a4a31b8b167f7ef000a9b2e72ff821 /genenetwork
parent259c84df610731fae4e1454a6c1698a4830ee7b6 (diff)
downloadgn-machines-f938b66e0d7404cc88c77008f90783c9df7cff83.tar.gz
Add tissue search interface.
* genenetwork-development.scm: Import shadow from (gnu packages admin). (gn-gemtext-threads-index): New function. (gn-gemtext-threads-project)[ci-jobs]: Add gn-gemtext-threads-index. (<tissue-configuration>): New type. (tissue-shepherd-service, tissue-reverse-proxy-server-block): New function. (%tissue-accounts, tissue-service-type): New variables. (operating-system)[services]: Add tissue tissue service and reverse proxy it. * genenetwork/development-helper.scm (tissue-index-gexp): New function.
Diffstat (limited to 'genenetwork')
-rw-r--r--genenetwork/development-helper.scm13
1 files changed, 13 insertions, 0 deletions
diff --git a/genenetwork/development-helper.scm b/genenetwork/development-helper.scm
index e8364ef..85ab1a1 100644
--- a/genenetwork/development-helper.scm
+++ b/genenetwork/development-helper.scm
@@ -157,3 +157,16 @@ SOURCE. PROFILE is a profile with necessary dependencies."
(chdir #$source)
(invoke "tissue" "web" #$output)))))
+
+(define (tissue-index-gexp source profile)
+ "Return a G-expression that builds a tissue index from
+SOURCE. PROFILE is a profile with necessary dependencies."
+ (with-imported-modules '((guix build utils))
+ (with-profile profile
+ #~(begin
+ (use-modules (guix build utils))
+
+ (mkdir-p #$output)
+ (chdir #$output)
+ (copy-recursively #$source #$output)
+ (invoke "tissue" "index")))))