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

Load messages and handle table string with single tab inside.

Browse source
This commit is contained in:
Dominik Pantůček 2023-03-31 09:37:08 +02:00
parent 3edfe6c02a
commit b72f1900e6
4 changed files with 17 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

10
members-payments.scm
View file

@ -53,9 +53,15 @@
(if (null? transactions)
mb
(let* ((transaction (car transactions))
(varsym-id
(varsym-id0
(string->number
(bank-transaction-varsym transaction))))
(bank-transaction-varsym transaction)))
(varsym-id
(or varsym-id0
(string->number
(irregex-replace (irregex "[^0-9].*" 'u)
(bank-transaction-message transaction)
"")))))
(loop (members-base-update mb
(lambda (mr)
(eq? (member-id mr)