[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] koha/acqui booksellers.pl [rel_3_0]
From: |
paul poulain |
Subject: |
[Koha-cvs] koha/acqui booksellers.pl [rel_3_0] |
Date: |
Wed, 01 Nov 2006 21:20:03 +0000 |
CVSROOT: /sources/koha
Module name: koha
Branch: rel_3_0
Changes by: paul poulain <tipaul> 06/11/01 21:20:03
Modified files:
acqui : booksellers.pl
Log message:
minor reindenting
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/acqui/booksellers.pl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.2.2.1&r2=1.2.2.2
Patches:
Index: booksellers.pl
===================================================================
RCS file: /sources/koha/koha/acqui/booksellers.pl,v
retrieving revision 1.2.2.1
retrieving revision 1.2.2.2
diff -u -b -r1.2.2.1 -r1.2.2.2
--- booksellers.pl 28 Aug 2006 16:51:06 -0000 1.2.2.1
+++ booksellers.pl 1 Nov 2006 21:20:03 -0000 1.2.2.2
@@ -20,7 +20,7 @@
# Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place,
# Suite 330, Boston, MA 02111-1307 USA
-# $Id: booksellers.pl,v 1.2.2.1 2006/08/28 16:51:06 toins Exp $
+# $Id: booksellers.pl,v 1.2.2.2 2006/11/01 21:20:03 tipaul Exp $
=head1 NAME
@@ -96,13 +96,11 @@
for ( my $i = 0 ; $i < $count ; $i++ ) {
my $orders = GetPendingOrders( $suppliers[$i]->{'id'} );
my $ordcount = scalar @$orders;
-
my %line;
if ( $toggle == 0 ) {
$line{even} = 1;
$toggle = 1;
- }
- else {
+ } else {
$line{even} = 0;
$toggle = 0;
}
@@ -117,8 +115,7 @@
$inner_line{authorisedby} = $orders->[$i2]{'authorisedby'};
$inner_line{surname} = $orders->[$i2]{'firstname'};
$inner_line{firstname} = $orders->[$i2]{'surname'};
- $inner_line{creationdate} =
- format_date( $orders->[$i2]{'creationdate'} );
+ $inner_line{creationdate} = format_date(
$orders->[$i2]{'creationdate'} );
$inner_line{closedate} = format_date( $orders->[$i2]{'closedate'} );
push @loop_basket, \%inner_line;
}
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] koha/acqui booksellers.pl [rel_3_0],
paul poulain <=