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

Preliminary payments and fees in one table.

Browse source
This commit is contained in:
Dominik Pantůček 2023-06-18 19:45:19 +02:00
parent a6f307d230
commit 34f54b2bb0
3 changed files with 22 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

9
src/hackerbase.scm
View file

@ -269,10 +269,7 @@
(print "Current month: " (cal-month->string (*current-month*)))
(newline)
(if mr
(let ()
(print-member-table mr)
(brmember-balance-history mr)
)
(print-member-table mr)
(print-members-base-table MB))
(newline))
((print-stats)
@ -320,7 +317,9 @@
(loop (cdr mrs))))))))
((fees)
(newline)
(print-members-fees-table MB (-show-destroyed-)))
(if mr
(print-member-balances-table mr)
(print-members-fees-table MB (-show-destroyed-))))
((repl)
(repl))
((genweb)