summaryrefslogtreecommitdiffstats
path: root/test/run_tests.pl
diff options
context:
space:
mode:
authorRichard Levitte <levitte@openssl.org>2017-11-03 21:22:17 +0100
committerRichard Levitte <levitte@openssl.org>2017-11-05 22:57:06 +0100
commitb81cfa07ada850fd287d0a0c82ba280907f18ce7 (patch)
tree796f74646a6e66c23af77d8c909bdb2327768437 /test/run_tests.pl
parentbcc096a50811bf0f0c4fd34b2993fed7a7015972 (diff)
Perl: Use our own globbing wrapper rather than File::Glob::glob
File::Glob::glob is deprecated, it's use generates this kind of message: File::Glob::glob() will disappear in perl 5.30. Use File::Glob::bsd_glob() instead. at ../master/Configure line 277. The first idea was to use a construction that makes the caller glob() use File::Glob::bsd_glob(). That turned out not to work well everywhere, so instead, we make our own wrapper, OpenSSL::Glob and use that. Fixes #4636 (this is an adaptation of #4040 and part of #4069, for 1.1.0) Reviewed-by: Andy Polyakov <appro@openssl.org> (Merged from https://github.com/openssl/openssl/pull/4666)
Diffstat (limited to 'test/run_tests.pl')
-rw-r--r--test/run_tests.pl4
1 files changed, 3 insertions, 1 deletions
diff --git a/test/run_tests.pl b/test/run_tests.pl
index e5bc927e67..1859e605b4 100644
--- a/test/run_tests.pl
+++ b/test/run_tests.pl
@@ -16,7 +16,9 @@ BEGIN {
use File::Spec::Functions qw/catdir catfile curdir abs2rel rel2abs/;
use File::Basename;
-use if $^O ne "VMS", 'File::Glob' => qw/glob/;
+use FindBin;
+use lib "$FindBin::Bin/../util";
+use OpenSSL::Glob;
use Module::Load::Conditional qw(can_load);
my $TAP_Harness = can_load(modules => { 'TAP::Harness' => undef })