civodul pushed a commit to branch master
in repository guix.

commit cfe68843a8bf8cded75e3901debc13023d1225b3
Author: Sughosha <sugho...@disroot.org>
AuthorDate: Tue Mar 11 08:33:06 2025 +0530

    services: readymedia: Change cache and log directory permissions to 755.
    
    Create cache directory and log directory with 755 permission, which passes
    run-readymedia-test.
    
    * gnu/services/upnp.scm (readymedia-activation): Change directory 
permissions
    of cache-directory and log-directory to 755.
    
    Change-Id: Iff30040c3fd52564510f66d3568dab0ef89e0449
    Signed-off-by: Ludovic Courtès <l...@gnu.org>
---
 gnu/services/upnp.scm | 12 ++++++++----
 1 file changed, 8 insertions(+), 4 deletions(-)

diff --git a/gnu/services/upnp.scm b/gnu/services/upnp.scm
index c125c07af2..47c32f0a1e 100644
--- a/gnu/services/upnp.scm
+++ b/gnu/services/upnp.scm
@@ -188,10 +188,14 @@
                         (mkdir-p/perms directory
                                        (getpw #$%readymedia-user-account)
                                        #o775)))
-                    (list #$cache-directory
-                          #$log-directory
-                          #$@(map readymedia-media-directory-path
-                                  media-directories)))))))
+                    (list #$@(map readymedia-media-directory-path
+                                  media-directories)))
+          (for-each (lambda (directory)
+                      (unless (file-exists? directory)
+                        (mkdir-p/perms directory
+                                       (getpw #$%readymedia-user-account)
+                                       #o755)))
+                    (list #$cache-directory #$log-directory))))))
 
 (define readymedia-service-type
   (service-type

Reply via email to