Preliminary ascii table in email.

This commit is contained in:
Dominik Pantůček 2023-04-17 22:40:31 +02:00
parent 3c3502bbfb
commit 9ee80bb5c9

View file

@ -46,7 +46,9 @@
configuration
util-time
members-fees
mbase)
mbase
members-print
table)
;; Prints email to the console
(define (print-notification-email em)
@ -129,9 +131,8 @@
(append
(list ""
"Unpaired transactions:")
(map (lambda (tr)
(format " ~A" tr))
unpaired)))))
(parameterize ((*table-border-style* 'ascii))
(unpaired-table mb))))))
(append income-lst
unpaired-lst)))