=cut
-use strict;
-use warnings;
+use Modern::Perl;
use C4::Auth;
use C4::Biblio;
use C4::Output;
});
my $supplier=$query->param('supplier');
-my @suppliers = Koha::Acquisition::Booksellers->search({ name => $supplier });
+my @suppliers = Koha::Acquisition::Booksellers->search(
+ { name => { -like => "%$supplier%" } },
+ { order_by => { -asc => 'name' } } );
#build result page
my $loop_suppliers = [];