brmlab/hackerbase
4
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Preliminary ascii table in email.

Browse source
This commit is contained in:
Dominik Pantůček 2023-04-17 22:40:31 +02:00
parent 3c3502bbfb
commit 9ee80bb5c9
1 changed files with 5 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

9
src/notifications.scm
View file

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