Bug 19593: follow up to fix tests

This commit is contained in:
Chris Cormack 2017-12-20 10:40:39 +13:00
parent dcc91c883f
commit 1755613eea
1 changed files with 7 additions and 2 deletions

View File

@ -66,7 +66,9 @@ my $sample_supplier1 = {
tax_rate => '1.0000',
discount => '1.0000',
notes => 'notes1',
deliverytime => undef
deliverytime => undef,
basketcount => 0,
subscriptioncount => 0
};
my $sample_supplier2 = {
name => 'Name2',
@ -86,7 +88,9 @@ my $sample_supplier2 = {
tax_rate => '2.0000',
discount => '2.0000',
notes => 'notes2',
deliverytime => 2
deliverytime => 2,
basketcount => 0,
subscriptioncount => 0
};
my $id_supplier1 = C4::Bookseller::AddBookseller($sample_supplier1);
@ -144,6 +148,7 @@ is( $bookseller1fromid, undef,
"fetch returns undef if no id given" );
$bookseller1fromid = Koha::Acquisition::Bookseller->fetch({ id => $id_supplier1});
$bookseller1fromid = field_filter($bookseller1fromid);
$sample_supplier1->{basketcount}=2;
is_deeply( $bookseller1fromid, $sample_supplier1,
"Get Supplier1 (fetch a bookseller by id)" );