diff options
Diffstat (limited to 'gnu/services/mail.scm')
| -rw-r--r-- | gnu/services/mail.scm | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/gnu/services/mail.scm b/gnu/services/mail.scm index d31cad5645d..93eea095853 100644 --- a/gnu/services/mail.scm +++ b/gnu/services/mail.scm | |||
| @@ -27,6 +27,13 @@ | |||
| 27 | ;;; | 27 | ;;; |
| 28 | ;;; Some of the help text was taken from the default dovecot.conf files. | 28 | ;;; Some of the help text was taken from the default dovecot.conf files. |
| 29 | 29 | ||
| 30 | ;;; Commentary: | ||
| 31 | ;;; | ||
| 32 | ;;; This module provides service definitions for the Dovecot POP3 and IMAP | ||
| 33 | ;;; mail server. | ||
| 34 | ;;; | ||
| 35 | ;;; Code: | ||
| 36 | |||
| 30 | (define-module (gnu services mail) | 37 | (define-module (gnu services mail) |
| 31 | #:use-module (gnu services) | 38 | #:use-module (gnu services) |
| 32 | #:use-module (gnu services base) | 39 | #:use-module (gnu services base) |
| @@ -105,13 +112,6 @@ | |||
| 105 | %default-rspamd-config-file | 112 | %default-rspamd-config-file |
| 106 | %default-rspamd-group)) | 113 | %default-rspamd-group)) |
| 107 | 114 | ||
| 108 | ;;; Commentary: | ||
| 109 | ;;; | ||
| 110 | ;;; This module provides service definitions for the Dovecot POP3 and IMAP | ||
| 111 | ;;; mail server. | ||
| 112 | ;;; | ||
| 113 | ;;; Code: | ||
| 114 | |||
| 115 | (define (uglify-field-name field-name) | 115 | (define (uglify-field-name field-name) |
| 116 | (let ((str (symbol->string field-name))) | 116 | (let ((str (symbol->string field-name))) |
| 117 | (string-join (string-split (if (string-suffix? "?" str) | 117 | (string-join (string-split (if (string-suffix? "?" str) |
