From 9552e1433f3ab4631f2f1df6c4cc323c243da442 Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Fri, 23 Jan 2026 10:22:23 +0100 Subject: [PATCH] Bug 41521: Exclude lib/WebService from pod xt tests Signed-off-by: Victor Grousset/tuxayo --- Koha/Devel/Files.pm | 5 +++++ xt/author/pod_checker.t | 2 +- xt/author/pod_coverage.t | 6 +++--- 3 files changed, 9 insertions(+), 4 deletions(-) diff --git a/Koha/Devel/Files.pm b/Koha/Devel/Files.pm index a356549e0a..6321eed30d 100644 --- a/Koha/Devel/Files.pm +++ b/Koha/Devel/Files.pm @@ -54,6 +54,11 @@ my $exceptions = { misc/cronjobs/build_browser_and_cloud.pl ) ], + pod => [ + qw( + lib/WebService/ + ) + ], core => [], }, js => { diff --git a/xt/author/pod_checker.t b/xt/author/pod_checker.t index 53e32ddf1b..461aea259b 100755 --- a/xt/author/pod_checker.t +++ b/xt/author/pod_checker.t @@ -6,7 +6,7 @@ use Test::NoWarnings; use Pod::Checker; use Koha::Devel::Files; -my $dev_files = Koha::Devel::Files->new; +my $dev_files = Koha::Devel::Files->new( { context => 'tidy' } ); my @files = $dev_files->ls_perl_files; plan tests => scalar @files + 1; diff --git a/xt/author/pod_coverage.t b/xt/author/pod_coverage.t index 8430a12c4c..5ebf7afa06 100755 --- a/xt/author/pod_coverage.t +++ b/xt/author/pod_coverage.t @@ -19,14 +19,14 @@ use Modern::Perl; use Test::More; use Test::NoWarnings; use Pod::Coverage; +use Koha::Devel::Files; # Note that we are using Pod::Coverage instead of Test::Pod::Coverage # We do not want to fail if no pod exists in the file. # That could be a next step -my @files; -push @files, qx{git ls-files '*.pm'}; -chomp for @files; +my $dev_files = Koha::Devel::Files->new( { context => 'tidy' } ); +my @files = $dev_files->ls_perl_files; plan tests => scalar(@files) + 1; -- 2.53.0