[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] koha/circ branchtransfers.pl circulation.pl cur...
From: |
Antoine Farnault |
Subject: |
[Koha-cvs] koha/circ branchtransfers.pl circulation.pl cur... |
Date: |
Fri, 21 Jul 2006 10:10:29 +0000 |
CVSROOT: /sources/koha
Module name: koha
Changes by: Antoine Farnault <toins> 06/07/21 10:10:29
Modified files:
circ : branchtransfers.pl circulation.pl
currenttransfers.pl returns.pl
selectbranchprinter.pl
waitingreservestransfers.pl
Log message:
subs renamed according to coding guidelines.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/circ/branchtransfers.pl?cvsroot=koha&r1=1.23&r2=1.24
http://cvs.savannah.gnu.org/viewcvs/koha/circ/circulation.pl?cvsroot=koha&r1=1.96&r2=1.97
http://cvs.savannah.gnu.org/viewcvs/koha/circ/currenttransfers.pl?cvsroot=koha&r1=1.2&r2=1.3
http://cvs.savannah.gnu.org/viewcvs/koha/circ/returns.pl?cvsroot=koha&r1=1.42&r2=1.43
http://cvs.savannah.gnu.org/viewcvs/koha/circ/selectbranchprinter.pl?cvsroot=koha&r1=1.15&r2=1.16
http://cvs.savannah.gnu.org/viewcvs/koha/circ/waitingreservestransfers.pl?cvsroot=koha&r1=1.3&r2=1.4
Patches:
Index: branchtransfers.pl
===================================================================
RCS file: /sources/koha/koha/circ/branchtransfers.pl,v
retrieving revision 1.23
retrieving revision 1.24
diff -u -b -r1.23 -r1.24
--- branchtransfers.pl 4 Jul 2006 14:36:51 -0000 1.23
+++ branchtransfers.pl 21 Jul 2006 10:10:29 -0000 1.24
@@ -39,7 +39,7 @@
my $linecolor1= 0;
my $linecolor2= 1;
-my $branches = getbranches();
+my $branches = GetBranches();
my $printers = getprinters(\%env);
Index: circulation.pl
===================================================================
RCS file: /sources/koha/koha/circ/circulation.pl,v
retrieving revision 1.96
retrieving revision 1.97
diff -u -b -r1.96 -r1.97
--- circulation.pl 20 Jun 2006 22:35:47 -0000 1.96
+++ circulation.pl 21 Jul 2006 10:10:29 -0000 1.97
@@ -54,7 +54,7 @@
flagsrequired => { circulate => 1 },
}
);
-my $branches = getbranches();
+my $branches = GetBranches();
# my $printers = getprinters();
# my $printer = getprinter($query, $printers);
Index: currenttransfers.pl
===================================================================
RCS file: /sources/koha/koha/circ/currenttransfers.pl,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -b -r1.2 -r1.3
--- currenttransfers.pl 30 May 2006 12:03:54 -0000 1.2
+++ currenttransfers.pl 21 Jul 2006 10:10:29 -0000 1.3
@@ -1,6 +1,6 @@
#!/usr/bin/perl
-# $Id: currenttransfers.pl,v 1.2 2006/05/30 12:03:54 alaurin Exp $
+# $Id: currenttransfers.pl,v 1.3 2006/07/21 10:10:29 toins Exp $
# Copyright 2000-2002 Katipo Communications
#
@@ -59,7 +59,7 @@
my $todaysdate = (1900+$datearr[5]).'-'.sprintf ("%0.2d",
($datearr[4]+1)).'-'.sprintf ("%0.2d", $datearr[3]);
# get the all the branches for reference
-my $branches = getbranches();
+my $branches = GetBranches();
my @branchesloop;
foreach my $br (keys %$branches) {
my @transferloop;
Index: returns.pl
===================================================================
RCS file: /sources/koha/koha/circ/returns.pl,v
retrieving revision 1.42
retrieving revision 1.43
diff -u -b -r1.42 -r1.43
--- returns.pl 4 Jul 2006 14:36:51 -0000 1.42
+++ returns.pl 21 Jul 2006 10:10:29 -0000 1.43
@@ -57,7 +57,7 @@
my $linecolor1 = '#ffffcc';
my $linecolor2 = 'white';
-my $branches = getbranches('IS');
+my $branches = GetBranches('IS');
my $printers = getprinters( \%env );
my $branch = C4::Context->userenv->{'branch'};
Index: selectbranchprinter.pl
===================================================================
RCS file: /sources/koha/koha/circ/selectbranchprinter.pl,v
retrieving revision 1.15
retrieving revision 1.16
diff -u -b -r1.15 -r1.16
--- selectbranchprinter.pl 4 Jul 2006 14:36:51 -0000 1.15
+++ selectbranchprinter.pl 21 Jul 2006 10:10:29 -0000 1.16
@@ -46,7 +46,7 @@
# try to get the branch and printer settings from the http....
my %env;
my $query=new CGI;
-my $branches=getbranches('IS');
+my $branches=GetBranches('IS');
my $printers=getprinters(\%env);
my $branch=$query->param('branch');
my $printer=$query->param('printer');
Index: waitingreservestransfers.pl
===================================================================
RCS file: /sources/koha/koha/circ/waitingreservestransfers.pl,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -b -r1.3 -r1.4
--- waitingreservestransfers.pl 6 Jun 2006 12:30:43 -0000 1.3
+++ waitingreservestransfers.pl 21 Jul 2006 10:10:29 -0000 1.4
@@ -1,6 +1,6 @@
#!/usr/bin/perl
-# $Id: waitingreservestransfers.pl,v 1.3 2006/06/06 12:30:43 alaurin Exp $
+# $Id: waitingreservestransfers.pl,v 1.4 2006/07/21 10:10:29 toins Exp $
# Copyright 2000-2002 Katipo Communications
#
@@ -61,7 +61,7 @@
}
# get the all the branches for reference
-my $branches = getbranches();
+my $branches = GetBranches();
my @branchesloop;
foreach my $br (keys %$branches) {
my @reservloop;
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] koha/circ branchtransfers.pl circulation.pl cur...,
Antoine Farnault <=