diff options
Diffstat (limited to '')
| -rw-r--r-- | src/xyz/euandreh/queue.scm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/src/xyz/euandreh/queue.scm b/src/xyz/euandreh/queue.scm index 8ae7ca9..d1e695b 100644 --- a/src/xyz/euandreh/queue.scm +++ b/src/xyz/euandreh/queue.scm @@ -529,7 +529,7 @@ keyfile ~a/private.key (user-account (name user) (group group) - (comment "DKIMproxy-out signing system user") + (comment "DKIMproxy.out signing system user") (home-directory "/var/empty") (shell (file-append shadow "/sbin/nologin")) (system? #t)) @@ -545,7 +545,7 @@ keyfile ~a/private.key (let ((uid (passwd:uid (getpwnam #$user))) (gid (group:gid (getgrnam #$group)))) (format (current-error-port) - "Creating DKIMproxy-out data directory: \"~a\".~%" #$data-directory) + "Creating DKIMproxy.out data directory: \"~a\".~%" #$data-directory) (mkdir-p #$data-directory) (chown #$data-directory uid gid) (chmod #$data-directory #o755) @@ -559,10 +559,10 @@ keyfile ~a/private.key private-key (number->string #$key-size))) (format (current-error-port) - "DKIMproxy private key file created: \"~a\".~%" private-key)) + "DKIMproxy.out private key file created: \"~a\".~%" private-key)) (else (format (current-error-port) - "Failed to create DKIMproxy private key file: \"~a\".~%" private-key)))) + "Failed to create DKIMproxy.out private key file: \"~a\".~%" private-key)))) (invoke #$(file-append openssl "/bin/openssl") "rsa" "-in" @@ -571,7 +571,7 @@ keyfile ~a/private.key "-out" public-key) (format (current-error-port) - "Setting permissions for the public/private DKIMproxy keypair: \"~a/{public,private}.key\".~%" #$data-directory) + "Setting permissions for the public/private DKIMproxy.out keypair: \"~a/{public,private}.key\".~%" #$data-directory) (chown private-key uid gid) (chown public-key uid gid) (chmod private-key #o400) |