From db15769428bacc9e8f1b89c407f496995e0c2616 Mon Sep 17 00:00:00 2001 From: EuAndreh Date: Fri, 17 Mar 2023 16:36:09 -0300 Subject: queue.scm: Add missing #$ ungexp to mail-directory --- src/org/euandre/queue.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src') 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) -- cgit v1.2.3