Fix fees and web export.

This commit is contained in:
Dominik Pantůček 2023-05-18 15:45:23 +02:00
parent 2be2371a77
commit fd15ff2821
4 changed files with 5 additions and 10 deletions

View file

@ -382,10 +382,9 @@
)))
(sort
(if destroyed?
(mbase-members MB)
(filter (lambda (mr)
(not (brmember-destroyed? mr)))
(mbase-members MB)))
(find-members-by-predicate MB (lambda x #t))
(find-members-by-predicate MB (lambda (mr)
(not (brmember-destroyed? mr)))))
brmember<?)))
(balances (map (lambda (m)
(list-ref m 6))