[Koha-cvs] koha/acqui booksellers.pl [rel_3_0]

[Antoine Farnault]

CVSROOT:	/sources/koha
Module name:	koha
Branch:		rel_3_0
Changes by:	Antoine Farnault <toins>	06/08/28 16:51:06

Modified files:
	acqui          : booksellers.pl 

Log message:
	fix a bug syntax.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/acqui/booksellers.pl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.2&r2=1.2.2.1

Patches:
Index: booksellers.pl
===================================================================
RCS file: /sources/koha/koha/acqui/booksellers.pl,v
retrieving revision 1.2
retrieving revision 1.2.2.1
diff -u -b -r1.2 -r1.2.2.1
--- booksellers.pl	1 Aug 2006 15:34:44 -0000	1.2
+++ booksellers.pl	28 Aug 2006 16:51:06 -0000	1.2.2.1
@@ -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 2006/08/01 15:34:44 toins Exp $
+# $Id: booksellers.pl,v 1.2.2.1 2006/08/28 16:51:06 toins Exp $
 
 =head1 NAME
 
@@ -96,7 +96,6 @@
 for ( my $i = 0 ; $i < $count ; $i++ ) {
     my $orders  = GetPendingOrders( $suppliers[$i]->{'id'} );
     my $ordcount = scalar @$orders;
-# FIXME : $ordcount seems to be equals to 0 each times...
 
     my %line;
     if ( $toggle == 0 ) {
@@ -113,14 +112,14 @@
     my @loop_basket;
     for ( my $i2 = 0 ; $i2 < $ordcount ; $i2++ ) {
         my %inner_line;
-        $inner_line{basketno}     = $orders->[$i2]->{'basketno'};
-        $inner_line{total}        = $orders->[$i2]->{'count(*)'};
-        $inner_line{authorisedby} = $orders->[$i2]->{'authorisedby'};
-        $inner_line{surname}      = $orders->[$i2]->{'firstname'};
-        $inner_line{firstname}    = $orders->[$i2]->{'surname'};
+        $inner_line{basketno}     = $orders->[$i2]{'basketno'};
+        $inner_line{total}        = $orders->[$i2]{'count(*)'};
+        $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{closedate} = format_date( $orders->[$i2]->{'closedate'} );
+          format_date( $orders->[$i2]{'creationdate'} );
+        $inner_line{closedate} = format_date( $orders->[$i2]{'closedate'} );
         push @loop_basket, \%inner_line;
     }
     $line{loop_basket} = \@loop_basket;