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

Rename source and info.

Browse source
This commit is contained in:
Dominik Pantůček 2023-04-11 22:11:11 +02:00
parent fb98eb6a78
commit 3ef6c0b628
7 changed files with 18 additions and 18 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/members-base.scm
View file

@ -239,7 +239,7 @@
string?
(map
(lambda (mr)
(member-record-info mr 'mail))
(brmember-info mr 'mail))
(filter member-active?
(members-base-members mb))))
string-ci<?))
@ -251,7 +251,7 @@
(foldl (lambda (mb email)
(members-base-update mb
(lambda (mr)
(equal? (member-record-info mr 'mail #f)
(equal? (brmember-info mr 'mail #f)
email))
(lambda (mr)
(member-add-mailman mr listname))))