From fd288d075b2328c4811e2ec2906bbd0a7e346218 Mon Sep 17 00:00:00 2001
From: Hilton Chain <hako@ultrarare.space>
Date: Sat, 20 Sep 2025 13:53:32 +0800
Subject: [PATCH] service: forgejo: Create log directory.

* modules/rosenthal/services/web.scm (forgejo-activation): Create
/var/log/forgejo.
---
 modules/rosenthal/services/web.scm | 12 +++++++-----
 1 file changed, 7 insertions(+), 5 deletions(-)

diff --git a/modules/rosenthal/services/web.scm b/modules/rosenthal/services/web.scm
index 09e4905..b06025e 100644
--- a/modules/rosenthal/services/web.scm
+++ b/modules/rosenthal/services/web.scm
@@ -194,11 +194,13 @@ reload its configuration file."))
 (define forgejo-activation
   #~(begin
       (use-modules (guix build utils))
-      (let ((dir "/var/lib/forgejo")
-            (user (getpwnam "forgejo")))
-        (mkdir-p dir)
-        (chown dir (passwd:uid user) (passwd:gid user))
-        (chmod dir #o750))))
+      (let ((user (getpwnam "forgejo")))
+        (for-each
+         (lambda (dir)
+           (mkdir-p dir)
+           (chown dir (passwd:uid user) (passwd:gid user))
+           (chmod dir #o750))
+         '("/var/lib/forgejo" "/var/log/forgejo")))))
 
 (define forgejo-shepherd-service
   (match-record-lambda <forgejo-configuration>