diff --git a/Koha/Devel/Files.pm b/Koha/Devel/Files.pm
index 224214f896..3d6911d906 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;