|
Lines 441-447
subtest 'clone' => sub {
Link Here
|
| 441 |
}; |
441 |
}; |
| 442 |
|
442 |
|
| 443 |
subtest 'set_rule + get_effective_rule' => sub { |
443 |
subtest 'set_rule + get_effective_rule' => sub { |
| 444 |
plan tests => 9; |
444 |
plan tests => 10; |
| 445 |
|
445 |
|
| 446 |
$schema->storage->txn_begin; |
446 |
$schema->storage->txn_begin; |
| 447 |
|
447 |
|
|
Lines 534-539
subtest 'set_rule + get_effective_rule' => sub {
Link Here
|
| 534 |
} |
534 |
} |
| 535 |
}; |
535 |
}; |
| 536 |
|
536 |
|
|
|
537 |
subtest 'test rules that can be blank' => sub { |
| 538 |
plan tests => 1; |
| 539 |
foreach my $blank_rule ( ('overduefinescap') ) { |
| 540 |
Koha::CirculationRules->set_rule( |
| 541 |
{ |
| 542 |
branchcode => $branchcode, |
| 543 |
categorycode => '*', |
| 544 |
itemtype => '*', |
| 545 |
rule_name => $blank_rule, |
| 546 |
rule_value => '', |
| 547 |
} |
| 548 |
); |
| 549 |
|
| 550 |
$rule = Koha::CirculationRules->get_effective_rule( |
| 551 |
{ |
| 552 |
branchcode => $branchcode, |
| 553 |
categorycode => undef, |
| 554 |
itemtype => undef, |
| 555 |
rule_name => $blank_rule, |
| 556 |
} |
| 557 |
); |
| 558 |
is( $rule->rule_value, '', "$blank_rule allowed to be set to blank" ); |
| 559 |
} |
| 560 |
}; |
| 537 |
|
561 |
|
| 538 |
subtest 'test rule matching with different combinations of rule scopes' => sub { |
562 |
subtest 'test rule matching with different combinations of rule scopes' => sub { |
| 539 |
my ( $tests, $order ) = _prepare_tests_for_rule_scope_combinations( |
563 |
my ( $tests, $order ) = _prepare_tests_for_rule_scope_combinations( |
|
Lines 575-583
subtest 'set_rule + get_effective_rule' => sub {
Link Here
|
| 575 |
}; |
599 |
}; |
| 576 |
|
600 |
|
| 577 |
my $our_branch_rules = Koha::CirculationRules->search({branchcode => $branchcode}); |
601 |
my $our_branch_rules = Koha::CirculationRules->search({branchcode => $branchcode}); |
| 578 |
is( $our_branch_rules->count, 4, "We added 8 rules"); |
602 |
is( $our_branch_rules->count, 5, "We added 9 rules"); |
| 579 |
$our_branch_rules->delete; |
603 |
$our_branch_rules->delete; |
| 580 |
is( $our_branch_rules->count, 0, "We deleted 8 rules"); |
604 |
is( $our_branch_rules->count, 0, "We deleted 9 rules"); |
| 581 |
|
605 |
|
| 582 |
$schema->storage->txn_rollback; |
606 |
$schema->storage->txn_rollback; |
| 583 |
}; |
607 |
}; |
| 584 |
- |
|
|