Prepare summary email action.

This commit is contained in:
Dominik Pantůček 2023-04-17 21:30:13 +02:00
parent 863afdc5b4
commit c5955679db
2 changed files with 10 additions and 0 deletions

View file

@ -30,6 +30,8 @@
(
make+print-reminder-email
make+send-reminder-email
make+print-summary-email
)
(import scheme
@ -118,4 +120,8 @@
(subject . "xxx")
(body . ,(summary-email-body mb)))))
(define (make+print-summary-email mb)
(let ((em (make-summary-email mb)))
(print-notification-email em)))
)