Finish splitting out member-format.
This commit is contained in:
parent
9f98bcb17d
commit
30664d10f8
3 changed files with 10 additions and 7 deletions
|
|
@ -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"))
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue