Lines 274-280
subtest 'apply() tests' => sub {
Link Here
|
274 |
|
274 |
|
275 |
subtest 'issue() tests' => sub { |
275 |
subtest 'issue() tests' => sub { |
276 |
|
276 |
|
277 |
plan tests => 5; |
277 |
plan tests => 6; |
278 |
|
278 |
|
279 |
$schema->storage->txn_begin; |
279 |
$schema->storage->txn_begin; |
280 |
|
280 |
|
Lines 308-312
subtest 'issue() tests' => sub {
Link Here
|
308 |
is( ref($old_line_issue), 'Koha::Old::Checkout', 'Result type is correct' ); |
308 |
is( ref($old_line_issue), 'Koha::Old::Checkout', 'Result type is correct' ); |
309 |
is( $old_line_issue->issue_id, $old_checkout->issue_id, 'Koha::Account::Line->issue should return the correct old_issue' ); |
309 |
is( $old_line_issue->issue_id, $old_checkout->issue_id, 'Koha::Account::Line->issue should return the correct old_issue' ); |
310 |
|
310 |
|
|
|
311 |
$line->issue_id(undef)->store; |
312 |
is( $line->issue, undef, 'Koha::Account::Line->issue should return undef if no issue linked' ); |
313 |
|
311 |
$schema->storage->txn_rollback; |
314 |
$schema->storage->txn_rollback; |
312 |
}; |
315 |
}; |
313 |
- |
|
|