subs renamed according to coding guidelines.

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='';

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

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