Regular predicates.
This commit is contained in:
parent
bf2b8ef23a
commit
4bd6837e08
6 changed files with 51 additions and 51 deletions
|
@ -45,7 +45,7 @@
|
|||
(let* ((rmb (filter-members-by-predicate
|
||||
mb
|
||||
(lambda (mr)
|
||||
(and (member-active? mr)
|
||||
(and (brmember-active? mr)
|
||||
(ldict-contains? (ldict-ref mr 'info) type)
|
||||
(not (null? (ldict-ref (ldict-ref mr 'info) type)))))))
|
||||
(recs (map (lambda (mr)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue