X-Git-Url: http://koha-dev.rot13.org:8081/gitweb/?a=blobdiff_plain;f=acqui%2Fnewordersuggestion.pl;h=b65e4ea62488fd9063f20a687417920bb74961ba;hb=4669a10776ff958a3b2d51963b7c4ec90ec02f09;hp=b5f2db0224846c18c4001c133aefc543acd6504b;hpb=b6d78c5104ccc20981acac4927d04b762ecbc930;p=koha_gimpoz

diff --git a/acqui/newordersuggestion.pl b/acqui/newordersuggestion.pl
index b5f2db0224..b65e4ea624 100755
--- a/acqui/newordersuggestion.pl
+++ b/acqui/newordersuggestion.pl
@@ -87,12 +87,13 @@ can be equal to
 =cut
 
 use strict;
+#use warnings; FIXME - Bug 2505
 
 use CGI;
 use C4::Auth;    # get_template_and_user
 use C4::Output;
 use C4::Suggestions;
-use C4::Bookseller;
+use C4::Bookseller qw/ GetBookSellerFromId /;
 use C4::Biblio;
 
 my $input = new CGI;
@@ -127,18 +128,18 @@ if ( $op eq 'connectDuplicate' ) {
 
 # getting all suggestions.
 my $suggestions_loop =
-  &SearchSuggestion( 
-  				{ suggestedby 	=> $borrowernumber, 
-				author		  	=> $author, 
-				title			=> $title, 
-				publishercode	=> $publishercode,
-				status		    => 'ACCEPTED'});
+        &SearchSuggestion( 
+                { managedby 	=> $borrowernumber, 
+                author		  	=> $author, 
+                title			=> $title, 
+                publishercode	=> $publishercode,
+                STATUS        => 'ACCEPTED'});
 my $vendor = GetBookSellerFromId($supplierid);
 $template->param(
     suggestions_loop        => $suggestions_loop,
     basketno                => $basketno,
     supplierid              => $supplierid,
-	name					=> $vendor->{'name'},
+    name					=> $vendor->{'name'},
     "op_$op"                => 1,
 );