summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAlexey Abramov <levenson@mmer.org>2020-09-08 15:53:48 +0200
committerTobias Geerinckx-Rice <me@tobias.gr>2021-05-06 11:31:48 +0200
commit0d6eb69266535c1570b8b85c9e88872de34626e5 (patch)
tree0af10ea9f2ae8c3583d180777ea4138d4b4d73ce
parent6e05920cef3afe0f0e3dde936a4b07a27b2c1ca3 (diff)
downloadguix-patches-0d6eb69266535c1570b8b85c9e88872de34626e5.tar
guix-patches-0d6eb69266535c1570b8b85c9e88872de34626e5.tar.gz
services: dovecot: Add ‘managesieve-sieve-capability’ option.
* gnu/services/mail.scm (protocol-configuration): Add a ‘managesieve-sieve-capability’ field. * doc/guix.texi (Mail Services): Document it. Signed-off-by: Tobias Geerinckx-Rice <me@tobias.gr>
-rw-r--r--doc/guix.texi10
-rw-r--r--gnu/services/mail.scm6
2 files changed, 16 insertions, 0 deletions
diff --git a/doc/guix.texi b/doc/guix.texi
index 2e5141d3bb..0947b9f028 100644
--- a/doc/guix.texi
+++ b/doc/guix.texi
@@ -20092,6 +20092,16 @@ report what the Sieve interpreter supports by default.
Defaults to @samp{()}.
@end deftypevr
+@deftypevr {@code{protocol-configuration} parameter} space-separated-string-list managesieve-sieve-capability
+Which SIEVE capabilities to report to clients that first connect to
+the ManageSieve service, before authentication. These may differ from the
+capabilities offered to authenticated users. If this field is left empty,
+report what the Sieve interpreter supports by default.
+
+Defaults to @samp{()}.
+
+@end deftypevr
+
@deftypevr {@code{protocol-configuration} parameter} space-separated-string-list mail-plugins
Space separated list of plugins to load.
@end deftypevr
diff --git a/gnu/services/mail.scm b/gnu/services/mail.scm
index 762662c58c..72dc123f41 100644
--- a/gnu/services/mail.scm
+++ b/gnu/services/mail.scm
@@ -370,6 +370,12 @@ If this is @samp{#t}, you must also specify a dictionary @i{via} the
"Which NOTIFY capabilities to report to clients that first connect to
the ManageSieve service, before authentication. These may differ from the
capabilities offered to authenticated users. If this field is left empty,
+report what the Sieve interpreter supports by default.")
+ (managesieve-sieve-capability
+ (space-separated-string-list '())
+ "Which SIEVE capabilities to report to clients that first connect to
+the ManageSieve service, before authentication. These may differ from the
+capabilities offered to authenticated users. If this field is left empty,
report what the Sieve interpreter supports by default."))
(define (serialize-protocol-configuration field-name val)