Start with small tweaks as proof of concept.
This commit is contained in:
parent
1147d73b11
commit
8f0d5acf0a
6 changed files with 35 additions and 31 deletions
|
@ -54,7 +54,8 @@
|
|||
primes
|
||||
members-base
|
||||
configuration
|
||||
bank-account)
|
||||
bank-account
|
||||
member-fees)
|
||||
|
||||
;; Prints human-readable information
|
||||
(define (print-member-info mr)
|
||||
|
@ -139,9 +140,10 @@
|
|||
(define (print-member-table mr)
|
||||
(print
|
||||
(table->string
|
||||
(list (list "Basic Information" "Payments")
|
||||
(list (list "Basic Information" "Payments" "Membership Status")
|
||||
(list (member-info->table mr)
|
||||
(member-payments->table mr))
|
||||
(member-payments->table mr)
|
||||
(member-calendar->table mr))
|
||||
)
|
||||
#:row0-border #t
|
||||
#:col-border #t)))
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue