[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] koha/acqui acqui-home.pl neworderempty.pl parce... [rel_3_0]
From: |
Antoine Farnault |
Subject: |
[Koha-cvs] koha/acqui acqui-home.pl neworderempty.pl parce... [rel_3_0] |
Date: |
Tue, 09 Jan 2007 09:43:27 +0000 |
CVSROOT: /sources/koha
Module name: koha
Branch: rel_3_0
Changes by: Antoine Farnault <toins> 07/01/09 09:43:27
Modified files:
acqui : acqui-home.pl neworderempty.pl parcels.pl
Log message:
removing warn compilation. (perl -wc)
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/acqui/acqui-home.pl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.15.2.2&r2=1.15.2.3
http://cvs.savannah.gnu.org/viewcvs/koha/acqui/neworderempty.pl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.1.2.6&r2=1.1.2.7
http://cvs.savannah.gnu.org/viewcvs/koha/acqui/parcels.pl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.2.2.2&r2=1.2.2.3
Patches:
Index: acqui-home.pl
===================================================================
RCS file: /sources/koha/koha/acqui/acqui-home.pl,v
retrieving revision 1.15.2.2
retrieving revision 1.15.2.3
diff -u -b -r1.15.2.2 -r1.15.2.3
--- acqui-home.pl 22 Dec 2006 15:02:56 -0000 1.15.2.2
+++ acqui-home.pl 9 Jan 2007 09:43:27 -0000 1.15.2.3
@@ -15,7 +15,7 @@
# Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place,
# Suite 330, Boston, MA 02111-1307 USA
-# $Id: acqui-home.pl,v 1.15.2.2 2006/12/22 15:02:56 toins Exp $
+# $Id: acqui-home.pl,v 1.15.2.3 2007/01/09 09:43:27 toins Exp $
=head1 NAME
@@ -95,7 +95,7 @@
# currencies
my @rates = GetCurrencies();
-my $count = scalar @rates;
+$count = scalar @rates;
my @loop_currency = ();
for ( my $i = 0 ; $i < $count ; $i++ ) {
Index: neworderempty.pl
===================================================================
RCS file: /sources/koha/koha/acqui/neworderempty.pl,v
retrieving revision 1.1.2.6
retrieving revision 1.1.2.7
diff -u -b -r1.1.2.6 -r1.1.2.7
--- neworderempty.pl 9 Jan 2007 09:15:59 -0000 1.1.2.6
+++ neworderempty.pl 9 Jan 2007 09:43:27 -0000 1.1.2.7
@@ -143,7 +143,7 @@
# get currencies (for change rates calcs if needed)
my @rates = GetCurrencies();
-my $count = scalar @rates;
+$count = scalar @rates;
my @loop_currency = ();
for ( my $i = 0 ; $i < $count ; $i++ ) {
Index: parcels.pl
===================================================================
RCS file: /sources/koha/koha/acqui/Attic/parcels.pl,v
retrieving revision 1.2.2.2
retrieving revision 1.2.2.3
diff -u -b -r1.2.2.2 -r1.2.2.3
--- parcels.pl 22 Dec 2006 15:02:56 -0000 1.2.2.2
+++ parcels.pl 9 Jan 2007 09:43:27 -0000 1.2.2.3
@@ -1,6 +1,6 @@
#!/usr/bin/perl
-# $Id: parcels.pl,v 1.2.2.2 2006/12/22 15:02:56 toins Exp $
+# $Id: parcels.pl,v 1.2.2.3 2007/01/09 09:43:27 toins Exp $
#script to show display basket of orders
#written by address@hidden 24/2/2000
@@ -96,7 +96,7 @@
$resultsperpage = 20 unless ($resultsperpage);
my @results =GetParcels($supplierid, $order, $code,$datefrom,$dateto);
-my $count = scalar @results;
+$count = scalar @results;
# multi page display gestion
$startfrom=0 unless ($startfrom);
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] koha/acqui acqui-home.pl neworderempty.pl parce... [rel_3_0],
Antoine Farnault <=