Lines 34-40
my $builder = t::lib::TestBuilder->new;
Link Here
|
34 |
|
34 |
|
35 |
subtest 'item() tests' => sub { |
35 |
subtest 'item() tests' => sub { |
36 |
|
36 |
|
37 |
plan tests => 2; |
37 |
plan tests => 3; |
38 |
|
38 |
|
39 |
$schema->storage->txn_begin; |
39 |
$schema->storage->txn_begin; |
40 |
|
40 |
|
Lines 63-68
subtest 'item() tests' => sub {
Link Here
|
63 |
is( ref( $account_line_item ), 'Koha::Item', 'Koha::Account::Line->item should return a Koha::Item' ); |
63 |
is( ref( $account_line_item ), 'Koha::Item', 'Koha::Account::Line->item should return a Koha::Item' ); |
64 |
is( $line->itemnumber, $account_line_item->itemnumber, 'Koha::Account::Line->item should return the correct item' ); |
64 |
is( $line->itemnumber, $account_line_item->itemnumber, 'Koha::Account::Line->item should return the correct item' ); |
65 |
|
65 |
|
|
|
66 |
$line->itemnumber(undef)->store; |
67 |
is( $line->item, undef, 'Koha::Account::Line->item should return undef if no item linked' ); |
68 |
|
66 |
$schema->storage->txn_rollback; |
69 |
$schema->storage->txn_rollback; |
67 |
}; |
70 |
}; |
68 |
|
71 |
|
69 |
- |
|
|