Lines 1299-1308
subtest '_new_from_dbic() tests' => sub {
Link Here
|
1299 |
$items_scalar = $biblio->items; |
1299 |
$items_scalar = $biblio->items; |
1300 |
@items_list = $biblio->items; |
1300 |
@items_list = $biblio->items; |
1301 |
|
1301 |
|
1302 |
is( $items_scalar->count, 2, 'No items in resultset' ); |
1302 |
is( $items_scalar->count, 2, 'Check count on resultset' ); |
1303 |
is( scalar @items_list, 2, 'Empty list in list context' ); |
1303 |
is( scalar @items_list, 2, 'Check number of entries returned in list context' ); |
1304 |
is( $items_list[0]->itemnumber, $item_1->itemnumber, 'First element correct' ); |
1304 |
is( $items_list[0]->itemnumber, $item_1->itemnumber, 'First element correct' ); |
1305 |
is( $items_list[1]->itemnumber, $item_2->itemnumber, 'Second element correct' ); |
1305 |
is( $items_list[1]->itemnumber, $item_2->itemnumber, 'Second element correct' ); |
1306 |
|
1306 |
|
1307 |
$schema->storage->txn_rollback; |
1307 |
$schema->storage->txn_rollback; |
1308 |
}; |
1308 |
}; |
1309 |
- |
|
|