From 8ac6f8627c981f192d2e86d7b91f1f54b2c4fd94 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Dominik=20Pant=C5=AF=C4=8Dek?=
 <dominik.pantucek@trustica.cz>
Date: Tue, 5 Dec 2023 19:29:47 +0100
Subject: [PATCH] Revolut payments

---
 src/members-payments.scm | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

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)