services: dovecot: Add ‘managesieve-notify-capability’ option.
* gnu/services/mail.scm (protocol-configuration): Add a ‘managesieve-notify-capability’ field. * doc/guix.texi (Mail Services): Document it. Signed-off-by: Tobias Geerinckx-Rice <me@tobias.gr>master
parent
0fd5bdcaf6
commit
6e05920cef
|
@ -20083,6 +20083,15 @@ Defaults to @samp{#f}.
|
||||||
|
|
||||||
@end deftypevr
|
@end deftypevr
|
||||||
|
|
||||||
|
@deftypevr {@code{protocol-configuration} parameter} space-separated-string-list managesieve-notify-capabilities
|
||||||
|
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.
|
||||||
|
|
||||||
|
Defaults to @samp{()}.
|
||||||
|
@end deftypevr
|
||||||
|
|
||||||
@deftypevr {@code{protocol-configuration} parameter} space-separated-string-list mail-plugins
|
@deftypevr {@code{protocol-configuration} parameter} space-separated-string-list mail-plugins
|
||||||
Space separated list of plugins to load.
|
Space separated list of plugins to load.
|
||||||
@end deftypevr
|
@end deftypevr
|
||||||
|
|
|
@ -364,7 +364,13 @@ a means for clients to set and retrieve per-mailbox, per-user metadata
|
||||||
and annotations over IMAP.
|
and annotations over IMAP.
|
||||||
|
|
||||||
If this is @samp{#t}, you must also specify a dictionary @i{via} the
|
If this is @samp{#t}, you must also specify a dictionary @i{via} the
|
||||||
@code{mail-attribute-dict} setting."))
|
@code{mail-attribute-dict} setting.")
|
||||||
|
(managesieve-notify-capability
|
||||||
|
(space-separated-string-list '())
|
||||||
|
"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."))
|
||||||
|
|
||||||
(define (serialize-protocol-configuration field-name val)
|
(define (serialize-protocol-configuration field-name val)
|
||||||
(format #t "protocol ~a {\n" (protocol-configuration-name val))
|
(format #t "protocol ~a {\n" (protocol-configuration-name val))
|
||||||
|
|
Reference in New Issue