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

Advanced accessors.

Browse source
This commit is contained in:
Dominik Pantůček 2023-04-11 22:38:22 +02:00
parent 4bd6837e08
commit 12a911bbff
7 changed files with 25 additions and 25 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/hackerbase.scm
View file

@ -330,8 +330,8 @@
(let loop ((lst nmembers))
(when (and (not (null? lst))
(or (not mr)
(eq? (member-id mr)
(member-id (car lst)))))
(eq? (brmember-id mr)
(brmember-id (car lst)))))
(if (-send-emails-)
(make+send-reminder-email (car lst))
(make+print-reminder-email (car lst)))