From 9f3ea4f3c69772f6a89bb3d8b7f804561bd4df48 Mon Sep 17 00:00:00 2001
From: Munyoki Kilyungi
Date: Tue, 14 May 2024 21:25:15 +0300
Subject: genenetwork: services: Make ssl path writable.

---
 genenetwork/services/genenetwork.scm | 12 +++++++++++-
 1 file changed, 11 insertions(+), 1 deletion(-)

diff --git a/genenetwork/services/genenetwork.scm b/genenetwork/services/genenetwork.scm
index c9df2f8..ecb97e5 100644
--- a/genenetwork/services/genenetwork.scm
+++ b/genenetwork/services/genenetwork.scm
@@ -344,6 +344,10 @@ object."
                               (source llm-db)
                               (target source)
                               (writable? #t))
+			     (file-system-mapping
+                              (source ssl-path)
+                              (target source)
+			      (writable? #t)))))
             (gunicorn-app
              (name "gn-auth")
              (package gn-auth)
@@ -371,7 +375,13 @@ object."
                               (writable? #t))
                              (file-system-mapping
                               (source gn-auth-secrets)
-                              (target source)))))))))
+                              (target source))
+			     ;; Getting:
+			     ;; OSError: [Errno 30] Read-only file system: '/var/ssl/clients-public-keys'
+			     (file-system-mapping
+                              (source ssl-path)
+                              (target source)
+			      (writable? #t)))))))))
 
 (define (genenetwork-nginx-server-blocks config)
   "Return a list of @code{<nginx-server-configuration>} records specifying
-- 
cgit v1.2.3