diff --git a/src/hackerbase.scm b/src/hackerbase.scm
index f25b6f1..5d4a7fa 100644
--- a/src/hackerbase.scm
+++ b/src/hackerbase.scm
@@ -194,7 +194,7 @@
 ;; Load the members database (required for everything anyway)
 (define MB0
   (if (-action-)
-      (let ((mb (load-members (*members-directory*) #t)))
+      (let ((mb (load-mbase (*members-directory*) #t)))
 	(if (-needs-bank-)
 	    (members-payments-process mb (*apikeys-file*) (*bank-dir*) (*jendasap-checked*))
 	    mb))
diff --git a/src/mbase.scm b/src/mbase.scm
index 5f88fc7..fb3b3eb 100644
--- a/src/mbase.scm
+++ b/src/mbase.scm
@@ -28,7 +28,8 @@
 (module
  mbase
  (
-  load-members
+  load-mbase
+  
   members-base-members
   find-member-by-id
   find-member-by-nick
@@ -68,7 +69,7 @@
  ;; Loads members database, if the second argument is true, shows
  ;; progress. Members database is a dictionary with id being the key
  ;; (number) and member record being the value.
- (define (load-members dn . opts)
+ (define (load-mbase dn . opts)
    (let ((progress? (and (not (null? opts))
 			 (car opts))))
      (make-ldict