---
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 3183ba4..1802085 100755
--- a/t/db_dependent/Items.t
+++ b/t/db_dependent/Items.t
@@ -35,7 +35,7 @@ my ($branch1, $branch2) = keys %$branches;
subtest 'General Add, Get and Del tests' => sub {
- plan tests => 6;
+ plan tests => 8;
# Start transaction
$dbh->{AutoCommit} = 0;
@@ -49,6 +49,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.");
--
1.9.1
_______________________________________________
Koha-patches mailing list
[email protected]
http://lists.koha-community.org/cgi-bin/mailman/listinfo/koha-patches
website : http://www.koha-community.org/
git : http://git.koha-community.org/
bugs : http://bugs.koha-community.org/
