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 |
- |
|
|