diff options
| author | Richard Levitte <levitte@openssl.org> | 2016-05-25 15:02:20 +0200 |
|---|---|---|
| committer | Richard Levitte <levitte@openssl.org> | 2016-05-27 17:41:32 +0200 |
| commit | 04b7805a8686d33186ca9e0571355e7fa2ef2d86 (patch) | |
| tree | 71e306eb9af5191d21f8773b73cc99c662bb95de /test/run_tests.pl | |
| parent | cb66390857fe9477e567f163302b4e34aeff8e6e (diff) | |
| download | openssl-new-04b7805a8686d33186ca9e0571355e7fa2ef2d86.tar.gz | |
perl glob: make sure to put quotes around the pattern, in case of spaces
RT#4486
Reviewed-by: Matt Caswell <matt@openssl.org>
Diffstat (limited to 'test/run_tests.pl')
| -rw-r--r-- | test/run_tests.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/test/run_tests.pl b/test/run_tests.pl index 158eaf9bab..6ce1521a75 100644 --- a/test/run_tests.pl +++ b/test/run_tests.pl @@ -42,13 +42,13 @@ my $list_mode = scalar(grep /^list$/, @tests) != 0; if (grep /^(alltests|list)$/, @tests) { @tests = grep { basename($_) =~ /^[0-9][0-9]-[^\.]*\.t$/ - } glob(catfile($recipesdir,"*.t")); + } glob('"'.catfile($recipesdir,"*.t").'"'); } else { my @t = (); foreach (@tests) { push @t, grep { basename($_) =~ /^[0-9][0-9]-[^\.]*\.t$/ - } glob(catfile($recipesdir,"*-$_.t")); + } glob('"'.catfile($recipesdir,"*-$_.t").'"'); } @tests = @t; } |