@@ -, +, @@ and 00:59 --- t/db_dependent/Members/IssueSlip.t | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) --- a/t/db_dependent/Members/IssueSlip.t +++ a/t/db_dependent/Members/IssueSlip.t @@ -251,7 +251,7 @@ EOS $date_due_in_time_as_formatted = output_pref( $date_due_in_time ); $issue_date = $date_due_in_time->clone->subtract_duration( DateTime::Duration->new( minutes => 1 ) ); AddIssue( $borrower, $barcode1, $date_due_in_time, undef, $issue_date ); - $date_due_in_late = $today->clone->set(hour => $today->hour - 1); + $date_due_in_late = $today->clone->subtract( hours => 1 ); $date_due_in_late_as_formatted = output_pref( $date_due_in_late ); $issue_date = $yesterday->clone; AddIssue( $borrower, $barcode2, $date_due_in_late, undef, $issue_date ); @@ -375,7 +375,7 @@ EOS $date_due_in_time_as_formatted = output_pref( $date_due_in_time ); $issue_date = $date_due_in_time->clone->subtract_duration( DateTime::Duration->new( minutes => 1 ) ); AddIssue( $borrower, $barcode1, $date_due_in_time, undef, $issue_date ); - $date_due_in_late = $today->clone->set(hour => $today->hour - 1); + $date_due_in_late = $today->clone->subtract( hours => 1 ); $date_due_in_late_as_formatted = output_pref( $date_due_in_late ); $issue_date = $yesterday->clone; AddIssue( $borrower, $barcode2, $date_due_in_late, undef, $issue_date ); --