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

Unpaired handling rename.

Browse source
This commit is contained in:
Dominik Pantůček 2023-04-13 20:17:16 +02:00
parent e54e4bd016
commit 8321c741dc
3 changed files with 6 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

8
src/mbase.scm
View file

@ -50,8 +50,8 @@
mbase-info
mbase-stats
members-base-add-unpaired
members-base-unpaired
mbase-add-unpaired
mbase-unpaired
members-base-active-emails
@ -232,13 +232,13 @@
(list keys (reverse data))))))
;; Adds unpaired transaction to given members-base
(define (members-base-add-unpaired mb tr)
(define (mbase-add-unpaired mb tr)
(ldict-set mb 'unpaired
(cons tr
(ldict-ref mb 'unpaired '()))))
;; Returns known unpaired transactions
(define (members-base-unpaired mb)
(define (mbase-unpaired mb)
(ldict-ref mb 'unpaired '()))
;; Returns the list of emails of all active members sorted