[Koha-patches] [PATCH] bug_11213: GetItemsInfo() test

Srdjan srdjan at catalyst.net.nz
Fri Apr 1 01:47:38 CEST 2016


---
 t/db_dependent/Items.t | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/t/db_dependent/Items.t b/t/db_dependent/Items.t
index 5df6eb5..9bbb9d2 100755
--- a/t/db_dependent/Items.t
+++ b/t/db_dependent/Items.t
@@ -40,7 +40,7 @@ my $location = 'My Location';
 
 subtest 'General Add, Get and Del tests' => sub {
 
-    plan tests => 14;
+    plan tests => 16;
 
     $schema->storage->txn_begin;
 
@@ -58,6 +58,11 @@ subtest 'General Add, Get and Del tests' => sub {
     cmp_ok($item_bibnum, '==', $bibnum, "New item is linked to correct biblionumber.");
     cmp_ok($item_bibitemnum, '==', $bibitemnum, "New item is linked to correct biblioitemnumber.");
 
+    # Get items.
+    my @items_infos = GetItemsInfo( $bibnum, "cn_sort" );
+    cmp_ok(scalar(@items_infos), '==', 1, "One item for biblionumber.");
+    cmp_ok($items_infos[0]{biblionumber}, '==', $bibnum, "Item has correct biblionumber.");
+
     # Get item.
     my $getitem = GetItem($itemnumber);
     cmp_ok($getitem->{'itemnumber'}, '==', $itemnumber, "Retrieved item has correct itemnumber.");
-- 
2.5.0


More information about the Koha-patches mailing list