Allow spaces in filenames when using perl's glob
Reviewed-by: Matt Caswell <matt@openssl.org>
This commit is contained in:
parent
c6cb8e3ca4
commit
1697a81baf
2 changed files with 2 additions and 2 deletions
|
@ -18,7 +18,7 @@ my @filelist;
|
|||
|
||||
foreach my $arg (@ARGV) {
|
||||
$arg =~ s|\\|/|g; # compensate for bug/feature in cygwin glob...
|
||||
foreach (glob $arg)
|
||||
foreach (glob qq("$arg"))
|
||||
{
|
||||
push @filelist, $_;
|
||||
}
|
||||
|
|
|
@ -26,7 +26,7 @@ foreach $arg (@ARGV) {
|
|||
next;
|
||||
}
|
||||
$arg =~ s|\\|/|g; # compensate for bug/feature in cygwin glob...
|
||||
foreach (glob $arg)
|
||||
foreach (glob qq("$arg"))
|
||||
{
|
||||
push @filelist, $_;
|
||||
}
|
||||
|
|
Loading…
Reference in a new issue