=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;
# getting the CGI params
my $basketno = $input->param('basketno');
-my $supplierid = $input->param('booksellerid');
+my $booksellerid = $input->param('booksellerid');
my $author = $input->param('author');
my $title = $input->param('title');
my $publishercode = $input->param('publishercode');
author => $author,
title => $title,
publishercode => $publishercode,
- status => 'ACCEPTED'});
-my $vendor = GetBookSellerFromId($supplierid);
+ STATUS => 'ACCEPTED'});
+my $vendor = GetBookSellerFromId($booksellerid);
$template->param(
suggestions_loop => $suggestions_loop,
basketno => $basketno,
- supplierid => $supplierid,
+ booksellerid => $booksellerid,
name => $vendor->{'name'},
"op_$op" => 1,
);