|
Lines 290-296
subtest 'list_rules() tests' => sub {
Link Here
|
| 290 |
}; |
290 |
}; |
| 291 |
|
291 |
|
| 292 |
subtest 'set_rules() tests' => sub { |
292 |
subtest 'set_rules() tests' => sub { |
| 293 |
plan tests => 23; |
293 |
plan tests => 28; |
| 294 |
|
294 |
|
| 295 |
$schema->storage->txn_begin; |
295 |
$schema->storage->txn_begin; |
| 296 |
|
296 |
|
|
Lines 388-392
subtest 'set_rules() tests' => sub {
Link Here
|
| 388 |
is( $json->{fine}, 10, "Fine rule set correctly for wildcard context" ); |
388 |
is( $json->{fine}, 10, "Fine rule set correctly for wildcard context" ); |
| 389 |
is( $json->{finedays}, 7, "Finedays rule set correctly for wildcard context" ); |
389 |
is( $json->{finedays}, 7, "Finedays rule set correctly for wildcard context" ); |
| 390 |
|
390 |
|
|
|
391 |
# Setting rules empty and undefined |
| 392 |
note("Setting rules to empty and undefined"); |
| 393 |
$rules_to_set->{fine} = ''; |
| 394 |
$rules_to_set->{finedays} = undef; |
| 395 |
$t->put_ok( "//$userid:$password@/api/v1/circulation_rules" => json => $rules_to_set )->status_is(200); |
| 396 |
|
| 397 |
# Verify the rules were updated |
| 398 |
$json = $t->tx->res->json; |
| 399 |
is( $json->{fine}, '', "Fine rule updated correctly" ); |
| 400 |
is( $json->{finedays}, undef, "Finedays rule remains the same" ); |
| 401 |
|
| 402 |
# Verify that the explicit undef results in a rule deletion |
| 403 |
my $rules = Koha::CirculationRules->search( |
| 404 |
{ categorycode => undef, branchcode => undef, itemtype => undef, rule_name => 'finedays' } ); |
| 405 |
is( $rules->count, 0, "Finedays rule deleted from database" ); |
| 406 |
|
| 391 |
$schema->storage->txn_rollback; |
407 |
$schema->storage->txn_rollback; |
| 392 |
}; |
408 |
}; |
| 393 |
- |
|
|