[Koha-cvs] koha/admin aqbookfund.pl aqbudget.pl

[Antoine Farnault]

CVSROOT:        /sources/koha
Module name:    koha
Changes by:     Antoine Farnault <toins>        06/07/21 10:17:13

Modified files:
        admin          : aqbookfund.pl aqbudget.pl 

Log message:
        subs renamed according to coding guidelines.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/admin/aqbookfund.pl?cvsroot=koha&r1=1.27&r2=1.28
http://cvs.savannah.gnu.org/viewcvs/koha/admin/aqbudget.pl?cvsroot=koha&r1=1.21&r2=1.22

Patches:
Index: aqbookfund.pl
===================================================================
RCS file: /sources/koha/koha/admin/aqbookfund.pl,v
retrieving revision 1.27
retrieving revision 1.28
diff -u -b -r1.27 -r1.28
--- aqbookfund.pl       4 Jul 2006 14:36:51 -0000       1.27
+++ aqbookfund.pl       21 Jul 2006 10:17:13 -0000      1.28
@@ -85,7 +85,7 @@
 # my @select_branch;
 # my %select_branches;
 
-my $branches = getbranches;
+my $branches = GetBranches;
 
 ################## ADD_FORM ##################################
 # called by default. Used to create form to add or  modify a record

Index: aqbudget.pl
===================================================================
RCS file: /sources/koha/koha/admin/aqbudget.pl,v
retrieving revision 1.21
retrieving revision 1.22
diff -u -b -r1.21 -r1.22
--- aqbudget.pl 4 Jul 2006 14:36:51 -0000       1.21
+++ aqbudget.pl 21 Jul 2006 10:17:13 -0000      1.22
@@ -270,7 +270,7 @@
     $sth->finish;
 
     # filters
-    my $branches = getbranches();
+    my $branches = GetBranches();
     my @branchloop;
     foreach my $branchcode (sort keys %{$branches}) {
         my $row = {