From 546dc62f87b00a8e472743e13c340c832964708d Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Tom=C3=A1s=20Cohen=20Arazi?= Date: Fri, 3 Oct 2025 11:11:31 -0300 Subject: [PATCH] Bug 39877: Tidy POD MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Signed-off-by: Tomás Cohen Arazi --- Koha/Devel/Files.pm | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/Koha/Devel/Files.pm b/Koha/Devel/Files.pm index 1f78c5820be..5597f0a2ac1 100644 --- a/Koha/Devel/Files.pm +++ b/Koha/Devel/Files.pm @@ -11,7 +11,7 @@ Koha::Devel::Files - A utility module for managing and filtering file lists in t use Koha::Devel::Files; - my $file_manager = Koha::Devel::Files->new({ context => 'tidy' }); + my $file_manager = Koha::Devel::Files->new( { context => 'tidy' } ); my @perl_files = $file_manager->ls_perl_files($git_range); my @js_files = $file_manager->ls_js_files(); @@ -110,7 +110,7 @@ my $exceptions = { =head2 new - my $file_manager = Koha::Devel::Files->new({ context => 'tidy' }); + my $file_manager = Koha::Devel::Files->new( { context => 'tidy' } ); Creates a new instance of Koha::Devel::Files. The constructor accepts a hash reference with a 'context' key, which specifies the context for file exclusions. @@ -148,7 +148,7 @@ sub build_git_exclude { =head2 ls_files - my @files = $file_manager->ls_files($filetype, $git_range); + my @files = $file_manager->ls_files( $filetype, $git_range ); Lists files that have been modified within a specified Git range. If no range is provided, it lists all Perl files, excluding those specified in the exceptions. @@ -204,7 +204,8 @@ sub ls_perl_files { my @exception_files = $exceptions->{pl}->{ $self->{context} }; @files = array_minus( @files, @exception_files ); } else { - my $cmd = sprintf q{git ls-files '*.pl' '*.PL' '*.pm' '*.t' svc opac/svc opac/unapi debian/build-git-snapshot %s}, + my $cmd = + sprintf q{git ls-files '*.pl' '*.PL' '*.pm' '*.t' svc opac/svc opac/unapi debian/build-git-snapshot %s}, $self->build_git_exclude('pl'); @files = qx{$cmd}; chomp for @files; -- 2.51.0