~ruther/guix-local

32fca2d36660b65686038f87845a7c173336041f — Sören Tempel 3 months ago 9b3b541
services: radicale: add shepherd configuration action

* gnu/services/mail.scm (radicale-shepherd-service): add configuration
action.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
1 files changed, 8 insertions(+), 2 deletions(-)

M gnu/services/mail.scm
M gnu/services/mail.scm => gnu/services/mail.scm +8 -2
@@ 2237,6 2237,9 @@ authentication plugin that extracts the username from the certificate.")
         (shell (file-append shadow "/sbin/nologin")))))

(define (radicale-shepherd-service cfg)
  (define config-file
    (serialize-radicale-configuration cfg))

  (list (shepherd-service
         (provision '(radicale))
         (documentation "Run the radicale daemon.")


@@ 2244,10 2247,13 @@ authentication plugin that extracts the username from the certificate.")
         (start #~(make-forkexec-constructor
                   (list #$(file-append (radicale-configuration-package cfg)
                                        "/bin/radicale")
                         "-C" #$(serialize-radicale-configuration cfg))
                         "-C" #$config-file)
                   #:user "radicale"
                   #:group "radicale"))
         (stop #~(make-kill-destructor)))))
         (stop #~(make-kill-destructor))
         (actions
           (list
             (shepherd-configuration-action config-file))))))

(define radicale-activation
  (match-lambda