[Koha-cvs] koha/acqui newbasket2.pl

[Antoine Farnault]

CVSROOT:	/sources/koha
Module name:	koha
Changes by:	Antoine Farnault <toins>	06/08/01 08:30:15

Modified files:
	acqui          : newbasket2.pl 

Log message:
	Add a call to GetOrderNumber

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/acqui/newbasket2.pl?cvsroot=koha&r1=1.18&r2=1.19

Patches:
Index: newbasket2.pl
===================================================================
RCS file: /sources/koha/koha/acqui/newbasket2.pl,v
retrieving revision 1.18
retrieving revision 1.19
diff -u -b -r1.18 -r1.19
--- newbasket2.pl	31 Jul 2006 14:45:37 -0000	1.18
+++ newbasket2.pl	1 Aug 2006 08:30:15 -0000	1.19
@@ -285,9 +285,8 @@
 
     my @ordernumbers;
     foreach my $bibitem (@bibitems) {
-
-        ( $order, $ordernumber ) =
-          &GetOrder($result->{biblionumber},$bibitem->{biblioitemnumber} );
+        my $ordernumber = GetOrderNumber($result->{biblionumber},$bibitem->{biblioitemnumber});
+        $order = &GetOrder($ordernumber);
 
         #only show order if its current;
         my %order;