|
Lines 225-245
subtest "store() tests" => sub {
Link Here
|
| 225 |
$passed_date = dt_from_string('2023-06-20'); |
225 |
$passed_date = dt_from_string('2023-06-20'); |
| 226 |
$hold->set( |
226 |
$hold->set( |
| 227 |
{ |
227 |
{ |
| 228 |
reservedate => $passed_date->ymd, |
228 |
reservedate => $passed_date->ymd, |
| 229 |
waitingdate => $passed_date->ymd, |
229 |
waitingdate => $passed_date->ymd, |
| 230 |
} |
230 |
} |
| 231 |
)->store(); |
231 |
)->store(); |
| 232 |
$hold->discard_changes; |
232 |
$hold->discard_changes; |
| 233 |
|
233 |
|
| 234 |
$hold->set_waiting; |
234 |
$hold->set_waiting; |
| 235 |
C4::Reserves::RevertWaitingStatus( |
235 |
C4::Reserves::RevertWaitingStatus( { itemnumber => $item->itemnumber } ); |
| 236 |
{ itemnumber => $item->itemnumber } |
|
|
| 237 |
); |
| 238 |
$hold->discard_changes; |
236 |
$hold->discard_changes; |
| 239 |
|
237 |
|
| 240 |
$expected_date = dt_from_string( $hold->reservedate )->add( years => 2 )->ymd; |
238 |
$expected_date = dt_from_string( $hold->reservedate )->add( years => 2 )->ymd; |
| 241 |
is( $hold->expirationdate, |
239 |
is( |
| 242 |
$expected_date, 'Expiration date set after reverting holds waiting status.' ); |
240 |
$hold->expirationdate, |
|
|
241 |
$expected_date, 'Expiration date set after reverting holds waiting status.' |
| 242 |
); |
| 243 |
|
243 |
|
| 244 |
my $patron_expiration_date = dt_from_string('2023-11-06')->ymd; |
244 |
my $patron_expiration_date = dt_from_string('2023-11-06')->ymd; |
| 245 |
$hold = Koha::Hold->new( |
245 |
$hold = Koha::Hold->new( |
| 246 |
- |
|
|