diff options
| author | EuAndreh <eu@euandre.org> | 2023-03-12 12:52:31 -0300 |
|---|---|---|
| committer | EuAndreh <eu@euandre.org> | 2023-03-12 12:52:31 -0300 |
| commit | 5f92cb3708ae77f6397580d8d58b902dc2ce6018 (patch) | |
| tree | 0e7a229e0064e9dc8b78add7ed7b19b15552590d | |
| parent | queue.scm: Export dovecot2-configuration (diff) | |
| download | package-repository-5f92cb3708ae77f6397580d8d58b902dc2ce6018.tar.gz package-repository-5f92cb3708ae77f6397580d8d58b902dc2ce6018.tar.xz | |
queue.scm: Ensure state-dir exists before generating dhparam file
| -rw-r--r-- | src/xyz/euandreh/queue.scm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/xyz/euandreh/queue.scm b/src/xyz/euandreh/queue.scm index cf2bdac..c354555 100644 --- a/src/xyz/euandreh/queue.scm +++ b/src/xyz/euandreh/queue.scm @@ -1314,6 +1314,7 @@ namespace inbox { "Creating Dovecot base_dir directory: \"~a\".~%" #$base-dir) (mkdir-p #$base-dir) (let ((dhparam.pem (string-append #$state-dir "/dhparam.pem"))) + (mkdir-p #$state-dir) (unless (file-exists? dhparam.pem) (format (current-error-port) "dhparam.pem file doesn't exist yet. Generating one...~%") |