Bug 12896: Move the bookseller-related code into Koha::Acquisition::Bookseller

[koha.git] / acqui / booksellers.pl

diff --git a/acqui/booksellers.pl b/acqui/booksellers.pl
index c8d70b9..9a2bb25 100755 (executable)
--- a/acqui/booksellers.pl
+++ b/acqui/booksellers.pl
@@ -60,10 +60,11 @@ use C4::Output;
 use CGI;
 
 use C4::Acquisition qw/ GetBasketsInfosByBookseller CanUserManageBasket /;
-use C4::Bookseller qw/ GetBookSellerFromId GetBookSeller /;
 use C4::Members qw/GetMember/;
 use C4::Context;
 
+use Koha::Acquisition::Bookseller;
+
 my $query = CGI->new;
 my ( $template, $loggedinuser, $cookie, $userflags ) = get_template_and_user(
     {   template_name   => 'acqui/booksellers.tt',
@@ -82,9 +83,9 @@ my $allbaskets= $query->param('allbaskets')||0;
 my @suppliers;
 
 if ($booksellerid) {
-    push @suppliers, GetBookSellerFromId($booksellerid);
+    push @suppliers, Koha::Acquisition::Bookseller->fetch({ id => $booksellerid });
 } else {
-    @suppliers = GetBookSeller($supplier);
+    @suppliers = Koha::Acquisition::Bookseller->search({ name => $supplier });
 }
 
 my $supplier_count = @suppliers;