@@ -, +, @@ --- t/db_dependent/Koha/Objects.t | 13 +++++++++++++ 1 file changed, 13 insertions(+) --- a/t/db_dependent/Koha/Objects.t +++ a/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; }; --