diff options
Diffstat (limited to 'Porting/acknowledgements.pl')
-rw-r--r-- | Porting/acknowledgements.pl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Porting/acknowledgements.pl b/Porting/acknowledgements.pl index 1d5ebb8c63..2d1356489e 100644 --- a/Porting/acknowledgements.pl +++ b/Porting/acknowledgements.pl @@ -125,7 +125,8 @@ sub _round { # version sub changes_files { my $output = qx(git diff --shortstat $since_until); - my @filenames = qx(git diff --numstat $since_until | $^X -anle 'next if m{^dist/Module-CoreList} or not /\\.(?:pm|c|h|t)\\z/; print \$F[2]'); + my $q = ($^O =~ /^(?:MSWin32|NetWare|VMS)$/io) ? '"' : "'"; + my @filenames = qx(git diff --numstat $since_until | $^X -anle ${q}next if m{^dist/Module-CoreList} or not /\\.(?:pm|c|h|t)\\z/; print \$F[2]$q); chomp @filenames; my $output_code_changed = qx# git diff --shortstat $since_until -- @filenames #; |