sub getbranches renamed to GetBranches according to the coding guidelines

diff --git a/reports/catalogue_stats.pl b/reports/catalogue_stats.pl
index c9de058..f22d371 100755 (executable)
--- a/reports/catalogue_stats.pl
+++ b/reports/catalogue_stats.pl
@@ -202,7 +202,7 @@ if ($do_it) {
 
        undef @select;
        push @select,"";
-       my $branches=getbranches();
+       my $branches=GetBranches();
        my %select_branches;
        $select_branches{""} = "";
        foreach my $branch (keys %$branches) {

diff --git a/reports/issues_avg_stats.pl b/reports/issues_avg_stats.pl
index edf5c8d..f05abfc 100755 (executable)
--- a/reports/issues_avg_stats.pl
+++ b/reports/issues_avg_stats.pl
@@ -161,7 +161,7 @@ if ($do_it) {
                $hassort1 =1 if ($value);
                push @select, $value;
        }
-       my $branches=getbranches();
+       my $branches=GetBranches();
        my @select_branch;
        my %select_branches;
        push @select_branch,"";

diff --git a/reports/issues_stats.pl b/reports/issues_stats.pl
index cabf3e8..c75e342 100755 (executable)
--- a/reports/issues_stats.pl
+++ b/reports/issues_stats.pl
@@ -165,7 +165,7 @@ if ($do_it) {
                $hassort1 =1 if ($value);
                push @select, $value;
        }
-       my $branches=getbranches();
+       my $branches=GetBranches();
        my @select_branch;
        my %select_branches;
        push @select_branch,"";

diff --git a/reports/reservereport.pl b/reports/reservereport.pl
index 0f9b3d7..fcbaa28 100755 (executable)
--- a/reports/reservereport.pl
+++ b/reports/reservereport.pl
@@ -43,7 +43,7 @@ if (!$branch) {
     $branch = "ALL";
 }
 
-my $branches=getbranches();
+my $branches=GetBranches();
 
 my ( $template, $borrowernumber, $cookie ) = get_template_and_user(
     {