[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 = {