From a02ff2feaecc1fb26a98af05fd1e51078b765c71 Mon Sep 17 00:00:00 2001
From: toins <toins>
Date: Fri, 21 Jul 2006 09:57:30 +0000
Subject: [PATCH] subs renamed according to coding guidelines.

---
 members/memberentry.pl | 2 +-
 members/pay.pl         | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/members/memberentry.pl b/members/memberentry.pl
index 6dea08ced6..ca34e0d96d 100755
--- a/members/memberentry.pl
+++ b/members/memberentry.pl
@@ -354,7 +354,7 @@ if ($delete){
 	my @branches;
 	my @select_branch;
 	my %select_branches;
-	my $branches=getbranches('IS');
+	my $branches=GetBranches('IS');
 	my $default;
 	# -----------------------------------------------------
 	#  the value of ip from the branches hash table
diff --git a/members/pay.pl b/members/pay.pl
index 7aedff92dc..2b4c442117 100755
--- a/members/pay.pl
+++ b/members/pay.pl
@@ -48,7 +48,7 @@ my $user=$input->remote_user;
 # get account details
 my %bor;
 $bor{'borrowernumber'}=$bornum;
-my $branches = getbranches();
+my $branches = GetBranches();
 my $printers = getprinters();
 my $branch = getbranch($input, $branches);
 
-- 
2.39.2