From 8321c741dc184a1fce0f41ee6c2b20d9159723a7 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Dominik=20Pant=C5=AF=C4=8Dek?=
 <dominik.pantucek@trustica.cz>
Date: Thu, 13 Apr 2023 20:17:16 +0200
Subject: [PATCH] Unpaired handling rename.

---
 src/mbase.scm            | 8 ++++----
 src/members-payments.scm | 2 +-
 src/members-print.scm    | 2 +-
 3 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/src/mbase.scm b/src/mbase.scm
index ac306c9..58e1eb7 100644
--- a/src/mbase.scm
+++ b/src/mbase.scm
@@ -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
diff --git a/src/members-payments.scm b/src/members-payments.scm
index d525591..0454025 100644
--- a/src/members-payments.scm
+++ b/src/members-payments.scm
@@ -110,7 +110,7 @@
 							  (bank-transaction-account transaction)
 							  (bank-transaction-bank transaction)))
 			      (not (member (bank-transaction-type transaction) ignored-transaction-types)))
-			 (members-base-add-unpaired mb transaction)
+			 (mbase-add-unpaired mb transaction)
 			 mb))
 		 (cdr transactions))))))
 
diff --git a/src/members-print.scm b/src/members-print.scm
index a1e1473..46d9f83 100644
--- a/src/members-print.scm
+++ b/src/members-print.scm
@@ -408,7 +408,7 @@
 	       (bank-transaction-account tr)
 	       (bank-transaction-bank tr)
 	       ))
-       (members-base-unpaired mb)))
+       (mbase-unpaired mb)))
      #:row0-border #t
      #:col-border #t)))