From 75a26aae1f32a67ba12acd77d6db40c1dbdb606a Mon Sep 17 00:00:00 2001
From: Efraim Flashner
Date: Thu, 3 Sep 2020 08:50:40 -0500
Subject: gn: Provide genotypes folder in container.

---
 gn/packages/genenetwork.scm | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

(limited to 'gn/packages/genenetwork.scm')

diff --git a/gn/packages/genenetwork.scm b/gn/packages/genenetwork.scm
index b534ae7..be56676 100644
--- a/gn/packages/genenetwork.scm
+++ b/gn/packages/genenetwork.scm
@@ -786,8 +786,13 @@ written in C")
                    ;; Where the database is located:
                    (("tux01") "localhost"))
                    ;(("tux01.uthsc.edu") "lily.uthsc.edu"))
-                 ;; This directory is expected to be writable
+                 ;; This directory is expected to be writable.
+                 ;; /tmp is private inside the container.
                  (symlink "/tmp" "web/tmp")
+                 ;; We mount the genotypes folder in the OS-config and
+                 ;; provide the symlink to that point in the package.
+                 ;; And now the directory is magically available!
+                 (symlink "/gnshare/gn/web/genotypes" "web/genotypes")
                  #t)))
            (add-after 'unpack 'use-local-links
              (lambda _
-- 
cgit v1.2.3