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

Fix all members table keyword args.

Browse source
This commit is contained in:
Dominik Pantůček 2023-06-15 23:01:30 +02:00
parent f1c3ec70a3
commit 901c472292
1 changed files with 8 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

15
src/members-print.scm
View file

@ -337,14 +337,15 @@
brmember-format
(list "Name" "Balance" "Last Payment")
(list "~N" "\t~B" "~L"))
#:ansi #t
#:row0-border #t
#:col-border #t)))
#:border '(((#:bottom #:right light) ... (#:bottom light))
...
((#:right light) ... none))
#:ansi-reset? #t)))
))
#:ansi #t
#:row-border #t
#:col-border #t
)))
#:border '(((#:bottom #:right light) ... (#:bottom light))
...
((#:right light) ... none))
#:ansi-reset? #t)))
(let ((pmrs (find-members-by-predicate mb brmember-has-problems?)))
(when (not (null? pmrs))
(newline)