From 82bd6aac358a8da898bc5afeb58ba42397b942d0 Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Mon, 26 May 2025 10:14:53 +0200 Subject: [PATCH] Bug 39995: Prevent Koha/Biblio.t to fail on slow servers Signed-off-by: Katrin Fischer --- t/db_dependent/Koha/Biblio.t | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/t/db_dependent/Koha/Biblio.t b/t/db_dependent/Koha/Biblio.t index 0cd7491d15..7cdf7989cc 100755 --- a/t/db_dependent/Koha/Biblio.t +++ b/t/db_dependent/Koha/Biblio.t @@ -39,6 +39,7 @@ use Koha::Exception; use MARC::Field; use MARC::Record; +use t::lib::Dates; use t::lib::TestBuilder; use t::lib::Mocks; use Test::MockModule; @@ -591,6 +592,12 @@ subtest 'to_api() tests' => sub { plan tests => ( scalar keys %{$biblioitem_api} ) + 4; foreach my $key ( keys %{$biblioitem_api} ) { + if ( $key eq 'timestamp' ) { + t::lib::Dates::compare( + $biblio_api->{$key}, $biblioitem_api->{$key}, + "$key is added to the biblio object" + ); + } is( $biblio_api->{$key}, $biblioitem_api->{$key}, "$key is added to the biblio object" ); }