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)))