Bug 10403: (follow-up) fix test to use vendor created earlier during test

[koha.git] / serials / acqui-search-result.pl

diff --git a/serials/acqui-search-result.pl b/serials/acqui-search-result.pl
index 5839cd4..e7d1e61 100755 (executable)
--- a/serials/acqui-search-result.pl
+++ b/serials/acqui-search-result.pl
@@ -45,7 +45,7 @@ use C4::Auth;
 use C4::Biblio;
 use C4::Output;
 use CGI;
-use C4::Acquisition;
+use C4::Acquisition qw( SearchOrders );
 use C4::Dates qw/format_date/;
 use C4::Bookseller qw( GetBookSeller );
 
@@ -66,7 +66,10 @@ my @suppliers = GetBookSeller($supplier);
 #build result page
 my $loop_suppliers = [];
 for my $s (@suppliers) {
-    my $orders = GetPendingOrders($s->{'id'});
+    my $orders = SearchOrders({
+        booksellerid => $s->{'id'},
+        pending => 1
+    });
 
     my $loop_basket = [];
     for my $ord ( @{$orders} ) {