From 71d7d080eb8db2237e54c1ca6e7c64a7d3f87029 Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Thu, 17 Jul 2025 15:38:01 +0200 Subject: [PATCH] Bug 40437: Remove warning from Koha/Installer.t t/db_dependent/Koha/Installer.t .. 1/4 Use of uninitialized value $db_version in numeric eq (==) at /kohadevbox/koha/Koha/Installer.pm line 32. Signed-off-by: Owen Leonard Signed-off-by: Martin Renvoize --- Koha/Installer.pm | 2 +- t/db_dependent/Koha/Installer.t | 3 ++- 2 files changed, 3 insertions(+), 2 deletions(-) diff --git a/Koha/Installer.pm b/Koha/Installer.pm index 235eac32475..48a50df2b62 100644 --- a/Koha/Installer.pm +++ b/Koha/Installer.pm @@ -29,7 +29,7 @@ sub needs_update { my $koha_version = Koha->version; my $code_version = TransformToNum($koha_version); - if ( $db_version == $code_version ) { + if ( $db_version && $db_version == $code_version ) { $needs_update = 0; } diff --git a/t/db_dependent/Koha/Installer.t b/t/db_dependent/Koha/Installer.t index c9091d2bde4..f127bf04526 100755 --- a/t/db_dependent/Koha/Installer.t +++ b/t/db_dependent/Koha/Installer.t @@ -18,7 +18,8 @@ # along with Koha; if not, see . use Modern::Perl; -use Test::More tests => 4; +use Test::More tests => 5; +use Test::NoWarnings; use Test::MockModule; use File::Temp qw/tempdir/; -- 2.50.1