about summary refs log tree commit diff
diff options
context:
space:
mode:
authorFrederick Muriuki Muriithi2024-06-12 13:56:53 -0500
committerFrederick Muriuki Muriithi2024-06-12 16:29:00 -0500
commit1120153af159a54edba677fda604ba5c9b36e80c (patch)
treec830186b11ef71d1d1f31763b61e61e11b3e3b4c
parent86c5a505ffde519055609fcc59f83b46b0f7d2c2 (diff)
downloadgn-machines-1120153af159a54edba677fda604ba5c9b36e80c.tar.gz
gn-uploader: Setup profile path
The profile path is necessary for use retrieving the included
bootstrap content.
-rw-r--r--genenetwork/services/genenetwork.scm15
1 files changed, 12 insertions, 3 deletions
diff --git a/genenetwork/services/genenetwork.scm b/genenetwork/services/genenetwork.scm
index 4f3b069..a3eca2b 100644
--- a/genenetwork/services/genenetwork.scm
+++ b/genenetwork/services/genenetwork.scm
@@ -425,7 +425,10 @@ a @code{<genenetwork-configuration>} record."
                                             `(("QCAPP_SECRETS" ,secrets)
                                               ("SQL_URI" ,sql-uri)
                                               ("UPLOAD_FOLDER" ,(string-append data-directory
-                                                                               "/uploads")))))))
+                                                                               "/uploads"))))))
+          (gn-uploader-profile (profile
+                                (content (package->development-manifest gn-uploader))
+                                (allow-collisions? #t))))
       (list (gunicorn-app
              (name "gn-uploader")
              (package gn-uploader)
@@ -439,7 +442,10 @@ a @code{<genenetwork-configuration>} record."
                      (value gn-uploader-conf))
                     (environment-variable
                      (name "HOME")
-                     (value "/tmp"))))
+                     (value "/tmp"))
+                    (environment-variable
+                     (name "GN_UPLOADER_ENVIRONMENT")
+                     (value gn-uploader-profile))))
              (mappings (list database-mapping
                              (file-system-mapping
                               (source gn-uploader-conf)
@@ -450,7 +456,10 @@ a @code{<genenetwork-configuration>} record."
                              (file-system-mapping
                               (source data-directory)
                               (target source)
-                              (writable? #t))))
+                              (writable? #t))
+                             (file-system-mapping
+                              (source gn-uploader-profile)
+                              (target source))))
              (extra-cli-arguments (list "--log-level" log-level)))))))
 
 (define (gn-uploader-nginx-server-block config)