Finish splitting out member-format.

This commit is contained in:
Dominik Pantůček 2023-04-11 13:28:07 +02:00
parent 9f98bcb17d
commit 30664d10f8
3 changed files with 10 additions and 7 deletions

View file

@ -39,13 +39,14 @@
util-mail
util-dict-list
members-payments
util-format)
util-format
brmember-format)
;; Creates reminder email body
(define (reminder-email-body mr)
(let ((C identity)
(M (lambda (s)
(member-format s mr)))
(brmember-format s mr)))
(F format)
(absdebt (format-amount (- (member-total-balance mr))))
(macc "2500079551/2010"))