Bug 35248: Add unit tests for Koha::Bibilio->bookable_items
This patch adds basic unit tests for Koha::Biblio->bookable_items
Test plan
1) Run t/db_dependent/Koha/Biblio.t
Signed-off-by: David Nind <david@davidnind.com>
Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
Signed-off-by: Katrin Fischer <katrin.fischer@bsz-bw.de>
(cherry picked from commit c6892074b8
)
Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com>
This commit is contained in:
parent
fe121ae034
commit
87e3749d61
1 changed files with 25 additions and 1 deletions
|
@ -17,7 +17,7 @@
|
|||
|
||||
use Modern::Perl;
|
||||
|
||||
use Test::More tests => 32;
|
||||
use Test::More tests => 33;
|
||||
use Test::Exception;
|
||||
use Test::Warn;
|
||||
|
||||
|
@ -148,6 +148,30 @@ subtest 'items() tests' => sub {
|
|||
|
||||
};
|
||||
|
||||
subtest 'bookable_items() tests' => sub {
|
||||
plan tests => 3;
|
||||
|
||||
$schema->storage->txn_begin;
|
||||
|
||||
my $biblio = $builder->build_sample_biblio();
|
||||
|
||||
# bookable items
|
||||
my $bookable_item1 = $builder->build_sample_item( { biblionumber => $biblio->biblionumber, bookable => 1 } );
|
||||
|
||||
# not bookable items
|
||||
my $non_bookable_item1 = $builder->build_sample_item( { biblionumber => $biblio->biblionumber, bookable => 0 } );
|
||||
my $non_bookable_item2 = $builder->build_sample_item( { biblionumber => $biblio->biblionumber, bookable => 0 } );
|
||||
|
||||
is( ref( $biblio->bookable_items ), 'Koha::Items', "bookable_items returns a Koha::Items resultset" );
|
||||
is( $biblio->bookable_items->count, 1, "bookable_items returns the correct number of items" );
|
||||
is(
|
||||
$biblio->bookable_items->next->itemnumber, $bookable_item1->itemnumber,
|
||||
"bookable_items returned the correct item"
|
||||
);
|
||||
|
||||
$schema->storage->txn_rollback;
|
||||
};
|
||||
|
||||
subtest 'get_coins and get_openurl' => sub {
|
||||
|
||||
plan tests => 4;
|
||||
|
|
Loading…
Reference in a new issue