aboutsummaryrefslogtreecommitdiff
path: root/src/org/euandre
diff options
context:
space:
mode:
authorEuAndreh <eu@euandre.org>2023-03-17 16:36:09 -0300
committerEuAndreh <eu@euandre.org>2023-03-17 16:36:09 -0300
commitdb15769428bacc9e8f1b89c407f496995e0c2616 (patch)
tree3f891d18bde5b61ed11e3a97d8f78d07634dd728 /src/org/euandre
parentqueue.scm: Parameterize Postfix Cyrus SASL directory (diff)
downloadpackage-repository-db15769428bacc9e8f1b89c407f496995e0c2616.tar.gz
package-repository-db15769428bacc9e8f1b89c407f496995e0c2616.tar.xz
queue.scm: Add missing #$ ungexp to mail-directory
Diffstat (limited to 'src/org/euandre')
-rw-r--r--src/org/euandre/queue.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/org/euandre/queue.scm b/src/org/euandre/queue.scm
index d8bf915..95b640a 100644
--- a/src/org/euandre/queue.scm
+++ b/src/org/euandre/queue.scm
@@ -1133,7 +1133,7 @@ header_checks = regexp:{ { /^Received:.*/ IGNORE }, { /^X-Originating-IP:.*/ IGN
(let ((user (getpwnam "root")))
(format (current-error-port)
"Creating email spool director: \"~a\".~%" #$mail-directory)
- (mkdir-p/perms mail-directory user #o755)
+ (mkdir-p/perms #$mail-directory user #o755)
(format (current-error-port)
"Creating Postfix queue directory: \"~a\".~%" #$queue-directory)
(mkdir-p/perms #$queue-directory user #o755)