diff --git a/src/members-payments.scm b/src/members-payments.scm index eee3b7e..e6e7e2f 100644 --- a/src/members-payments.scm +++ b/src/members-payments.scm @@ -86,9 +86,14 @@ (ci2 (substring-index " " msg)) (vs2 (if ci2 (substring msg 0 ci2) + msg)) + (ci3 (substring-index "NULL" msg)) + (vs3 (if ci3 + (substring msg (+ ci3 4) 4) msg))) (or (string->number vs1) - (string->number vs2)))))) + (string->number vs2) + (string->number vs3)))))) varsym-id))) ;; Special comparator (originally with JendaSAP hack)