Lines 375-381
$schema->storage->txn_rollback;
Link Here
|
375 |
|
375 |
|
376 |
subtest 'suspend and resume tests' => sub { |
376 |
subtest 'suspend and resume tests' => sub { |
377 |
|
377 |
|
378 |
plan tests => 21; |
378 |
plan tests => 24; |
379 |
|
379 |
|
380 |
$schema->storage->txn_begin; |
380 |
$schema->storage->txn_begin; |
381 |
|
381 |
|
Lines 403-416
subtest 'suspend and resume tests' => sub {
Link Here
|
403 |
$hold->discard_changes; # refresh object |
403 |
$hold->discard_changes; # refresh object |
404 |
|
404 |
|
405 |
ok( $hold->is_suspended, 'Hold is suspended' ); |
405 |
ok( $hold->is_suspended, 'Hold is suspended' ); |
|
|
406 |
$t->json_is('/end_date', undef, 'Hold suspension has no end date'); |
407 |
|
408 |
my $end_date = output_pref({ |
409 |
dt => dt_from_string( undef ), |
410 |
dateformat => 'rfc3339', |
411 |
dateonly => 1 |
412 |
}); |
413 |
|
414 |
$t->post_ok( "//$userid:$password@/api/v1/holds/" . $hold->id . "/suspension" => json => { end_date => $end_date } ); |
415 |
|
416 |
$hold->discard_changes; # refresh object |
417 |
|
418 |
ok( $hold->is_suspended, 'Hold is suspended' ); |
406 |
$t->json_is( |
419 |
$t->json_is( |
407 |
'/end_date', |
420 |
'/end_date', |
408 |
output_pref( |
421 |
output_pref({ |
409 |
{ dt => dt_from_string( $hold->suspend_until ), |
422 |
dt => dt_from_string( $hold->suspend_until ), |
410 |
dateformat => 'rfc3339', |
423 |
dateformat => 'rfc3339', |
411 |
dateonly => 1 |
424 |
dateonly => 1 |
412 |
} |
425 |
}), |
413 |
) |
426 |
'Hold suspension has correct end date' |
414 |
); |
427 |
); |
415 |
|
428 |
|
416 |
$t->delete_ok( "//$userid:$password@/api/v1/holds/" . $hold->id . "/suspension" ) |
429 |
$t->delete_ok( "//$userid:$password@/api/v1/holds/" . $hold->id . "/suspension" ) |
417 |
- |
|
|