diff --git a/opac/opac-reserve.pl b/opac/opac-reserve.pl
index 95d1cfdf95..356f658d60 100755
--- a/opac/opac-reserve.pl
+++ b/opac/opac-reserve.pl
@@ -56,7 +56,7 @@ $template->param(rank => $rank);
 my $branch = $query->param('branch');
 $template->param(branch => $branch);
 
-my $branches = getbranches();
+my $branches = GetBranches();
 # make sure it's a real branch
 if (!$branches->{$branch}) {
 $branch='';
diff --git a/opac/opac-search.pl b/opac/opac-search.pl
index 00d922b8be..0b17e49d2c 100755
--- a/opac/opac-search.pl
+++ b/opac/opac-search.pl
@@ -407,7 +407,7 @@ $template->param( phraseorterm => $phraseorterm );
 	$sth->finish;
 	my @select_branch;
 	my %select_branches;
-	my $branches=getbranches();
+	my $branches=GetBranches();
 	push @select_branch, "";
 	$select_branches{''} = "";
         foreach my $branch ( keys %$branches ){
diff --git a/opac/opac-user.pl b/opac/opac-user.pl
index 314348c562..188a3bf314 100755
--- a/opac/opac-user.pl
+++ b/opac/opac-user.pl
@@ -109,7 +109,7 @@ $template->param(issues_count => $count);
 $template->param(OVERDUES => \@overdues);
 $template->param(overdues_count => $overdues_count);
 
-my $branches = getbranches();
+my $branches = GetBranches();
 
 # now the reserved items....
 my ($rcount, $reserves) = FindReserves(undef, $borrowernumber);