Preliminary ascii table in email.
This commit is contained in:
parent
3c3502bbfb
commit
9ee80bb5c9
1 changed files with 5 additions and 4 deletions
|
@ -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)))
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue