diff options
| author | EuAndreh <eu@euandre.org> | 2023-03-17 12:57:33 -0300 |
|---|---|---|
| committer | EuAndreh <eu@euandre.org> | 2023-03-17 12:57:33 -0300 |
| commit | ccf4678ce719063e59b04f6f18f6f52b4a8d5ee5 (patch) | |
| tree | 94bcb9b550838f3451d7f6181097d2b6cae3b2a9 /src/org/euandre | |
| parent | tests/: Adjust expected "master.cf" files (diff) | |
| download | package-repository-ccf4678ce719063e59b04f6f18f6f52b4a8d5ee5.tar.gz package-repository-ccf4678ce719063e59b04f6f18f6f52b4a8d5ee5.tar.xz | |
queue.scm: s/srfi-1:/s1:/g
Diffstat (limited to 'src/org/euandre')
| -rw-r--r-- | src/org/euandre/queue.scm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/org/euandre/queue.scm b/src/org/euandre/queue.scm index 1cbf63e..e22a0ff 100644 --- a/src/org/euandre/queue.scm +++ b/src/org/euandre/queue.scm @@ -1,7 +1,7 @@ (define-module (org euandre queue) #:use-module ((gnu build linux-container) #:prefix container:) #:use-module ((guix licenses) #:prefix license:) - #:use-module ((srfi srfi-1) #:prefix srfi-1:) + #:use-module ((srfi srfi-1) #:prefix s1:) #:use-module (guix build-system gnu) #:use-module (guix build-system python) #:use-module (guix build-system trivial) @@ -648,7 +648,7 @@ to the list of supplementary groups of the user of such running process."))) cyrus-sasl-accounts) (service-extension shepherd-root-service-type cyrus-sasl-shepherd-service))) - (compose srfi-1:concatenate) + (compose s1:concatenate) (extend (lambda (config services) (cyrus-sasl-configuration (inherit config) @@ -689,7 +689,7 @@ By default, the daemon runs in a container."))) (data-directory dkimproxyout-configuration-data-directory (default "/var/lib/dkimproxyout")) (run-in-container? dkimproxyout-configuration-run-in-container? (default #f)) (container-name dkimproxyout-configuration-container-name (default "dkimproxyout")) - (container-namespaces dkimproxyout-configuration-container-namespaces (default (srfi-1:fold delq container:%namespaces '(net)))) + (container-namespaces dkimproxyout-configuration-container-namespaces (default (s1:fold delq container:%namespaces '(net)))) (extra-mappings dkimproxyout-configuration-extra-mappings (default '()))) ;; # FIXME:DOCUMENTATION add this to the service documentation @@ -880,7 +880,7 @@ keyfile ~a/private.key (hostname postfix-configuration-hostname (default (gethostname))) (run-in-container? postfix-configuration-run-in-container? (default #f)) (container-name postfix-configuration-container-name (default "postfix")) - (container-namespaces postfix-configuration-container-namespaces (default (srfi-1:fold delq container:%namespaces '(net)))) + (container-namespaces postfix-configuration-container-namespaces (default (s1:fold delq container:%namespaces '(net)))) (extra-mappings postfix-configuration-extra-mappings (default '()))) |