From 4c7b0054f3725d32291d3d26d72920708d9b9c44 Mon Sep 17 00:00:00 2001
From: Frederick Muriuki Muriithi
Date: Tue, 9 Apr 2024 06:41:49 +0300
Subject: gn-uploader: Made datadir writable and set up uploads directory.

---
 genenetwork/services/genenetwork.scm | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/genenetwork/services/genenetwork.scm b/genenetwork/services/genenetwork.scm
index 62849da..9d503ab 100644
--- a/genenetwork/services/genenetwork.scm
+++ b/genenetwork/services/genenetwork.scm
@@ -414,7 +414,9 @@ a @code{<genenetwork-configuration>} record."
           (gn-uploader-conf (computed-file "gn-uploader.conf"
                                            (configuration-file-gexp
                                             `(("QCAPP_SECRETS" ,secrets)
-                                              ("SQL_URI" ,sql-uri))))))
+                                              ("SQL_URI" ,sql-uri)
+                                              ("UPLOAD_FOLDER" ,(string-append data-directory
+                                                                               "/uploads")))))))
       (list (gunicorn-app
              (name "gn-uploader")
              (package gn-uploader)
@@ -438,7 +440,8 @@ a @code{<genenetwork-configuration>} record."
                               (target source))
                              (file-system-mapping
                               (source data-directory)
-                              (target source)))))))))
+                              (target source)
+                              (writable? #t)))))))))
 
 (define (gn-uploader-nginx-server-block config)
   (match-record config <gn-uploader-configuration>
-- 
cgit v1.2.3