From a4254d5e8d40a508dc6763a636c70df16470fd02 Mon Sep 17 00:00:00 2001
From: EuAndreh <eu@euandre.org>
Date: Wed, 30 Nov 2022 17:55:16 -0300
Subject: queue.scm: Restrict Cyrus SASL state-dir to 750

---
 src/xyz/euandreh/queue.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/xyz/euandreh/queue.scm b/src/xyz/euandreh/queue.scm
index 88a405c..4932466 100644
--- a/src/xyz/euandreh/queue.scm
+++ b/src/xyz/euandreh/queue.scm
@@ -412,7 +412,7 @@ collections.OrderedDict that works in Python 2.4-2.6.")
            "Creating Cyrus SASL socket directory: \"~a\".~%" #$state-dir)
           (mkdir-p #$state-dir)
           (chown #$state-dir (passwd:uid user) (passwd:gid user))
-          (chmod #$state-dir #o755)))))
+          (chmod #$state-dir #o750)))))
 
 (define (cyrus-sasl-accounts config)
   (match-record config <cyrus-sasl-configuration>
-- 
cgit v1.2.3