summaryrefslogtreecommitdiff
path: root/gnu/services/mail.scm
diff options
context:
space:
mode:
authorYelninei <yelninei@tutamail.com>2026-02-03 08:30:53 +0000
committerLudovic Courtès <ludo@gnu.org>2026-03-11 18:27:46 +0100
commit6eb6971f4d721fc8d648323f0dbd52d0697b2a7b (patch)
tree3f7a3a67aaaacc584f24e87622dee3e0d403f9b1 /gnu/services/mail.scm
parent1ec777def84fcce9cfe77acb2ce3112b04b37085 (diff)
services: Add and use shepherd-signal-action.
* gnu/services/shepherd.scm (shepherd-signal-action): New procedure. * gnu/services/audio.scm (mpd-shepherd-service): Use it for actions. * gnu/services/base.scm (syslog-shepherd-service): * gnu/services/base.scm (dnsmasq-shepherd-service): * gnu/services/file-sharing.scm (transmission-daemon-shepherd-service): * gnu/services/monitoring.scm (vnstat-shepherd-service): * gnu/services/mail.scm (rspamd-shepherd-service): * doc/guix.texi (shepherd-signal-action): Document it. Change-Id: Ief5e00c7d430ec4aa28c3ef11d0ef9897793b45f Signed-off-by: Ludovic Courtès <ludo@gnu.org> Merges: #6097
Diffstat (limited to 'gnu/services/mail.scm')
-rw-r--r--gnu/services/mail.scm28
1 files changed, 8 insertions, 20 deletions
diff --git a/gnu/services/mail.scm b/gnu/services/mail.scm
index 5d4bc4684d3..70825dd1a9d 100644
--- a/gnu/services/mail.scm
+++ b/gnu/services/mail.scm
@@ -2483,26 +2483,14 @@ worker \"fuzzy\" {
(actions
(list
(shepherd-configuration-action config-file)
- (shepherd-action
- (name 'reload)
- (documentation "Reload rspamd.")
- (procedure
- #~(lambda (pid)
- (if pid
- (begin
- (kill pid SIGHUP)
- (display "Service rspamd has been reloaded"))
- (format #t "Service rspamd is not running.")))))
- (shepherd-action
- (name 'reopen)
- (documentation "Reopen log files.")
- (procedure
- #~(lambda (pid)
- (if pid
- (begin
- (kill pid SIGUSR1)
- (display "Reopening the logs for rspamd"))
- (format #t "Service rspamd is not running.")))))))))))
+ (shepherd-signal-action
+ 'reload SIGHUP
+ #:documentation "Reload rspamd."
+ #:message "Service rspamd has been reloaded")
+ (shepherd-signal-action
+ 'reopen SIGUSR1
+ #:documentation "Reopen log files."
+ #:message "Reopening the logs for rspamd.")))))))
(define rspamd-service-type
(service-type