Fix -problems.

This commit is contained in:
Dominik Pantůček 2023-04-04 23:01:53 +02:00
parent c17671e707
commit 09c9005a7b
2 changed files with 2 additions and 1 deletions

View file

@ -212,7 +212,7 @@ CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
((gencards) ((gencards)
(apply cards-export MB (-fname-))) (apply cards-export MB (-fname-)))
((problems) ((problems)
(let ((num (let loop ((mb MB) (let ((num (let loop ((mb (members-base-members MB))
(num 0)) (num 0))
(if (null? mb) (if (null? mb)
num num

View file

@ -29,6 +29,7 @@
members-base members-base
( (
load-members load-members
members-base-members
find-member-by-id find-member-by-id
find-member-by-nick find-member-by-nick
find-members-by-nick find-members-by-nick