From eae067351e5e1e994bd9816e3849bd3e86bbc6eb Mon Sep 17 00:00:00 2001 From: Marcel de Rooy Date: Thu, 25 May 2023 14:25:32 +0000 Subject: [PATCH] Bug 33837: Add unit test Test plan: Run t/db_dependent/Koha/Objects.t Signed-off-by: Marcel de Rooy Signed-off-by: Jonathan Druart --- t/db_dependent/Koha/Objects.t | 13 +++++++++++++ 1 file changed, 13 insertions(+) diff --git a/t/db_dependent/Koha/Objects.t b/t/db_dependent/Koha/Objects.t index a64f9007eb9..c8b70efb4f3 100755 --- a/t/db_dependent/Koha/Objects.t +++ b/t/db_dependent/Koha/Objects.t @@ -1188,6 +1188,19 @@ subtest "filter_by_last_update" => sub { ); }; + subtest 'Parameter datetime' => sub { + my $now = dt_from_string(); + my $rs = Koha::Patrons->search({ borrowernumber => { -in => \@borrowernumbers } } ); + $rs->update({ updated_on => $now->clone->subtract( hours => 25 ) }); + is( $rs->filter_by_last_update({ timestamp_column_name => 'updated_on', from => $now })->count, 0, 'All updated yesterday' ); + is( $rs->filter_by_last_update({ timestamp_column_name => 'updated_on', from => $now->clone->subtract( days => 1 ) })->count, + 6, 'Yesterday, truncated from is inclusive' ); + is( $rs->filter_by_last_update({ timestamp_column_name => 'updated_on', from => $now->clone->subtract( days => 1 ), + datetime => 1 })->count, 0, 'Yesterday, not truncated, one hour too late' ); + is( $rs->filter_by_last_update({ timestamp_column_name => 'updated_on', from => $now->clone->subtract( hours => 25 ), + datetime => 1 })->count, 6, 'Yesterday - 1h, not truncated, within time frame' ); + }; + $schema->storage->txn_rollback; }; -- 2.25.1