[openssl-commits] [openssl] OpenSSL_1_1_0-stable update

Richard Levitte levitte at openssl.org
Fri Jul 28 12:48:04 UTC 2017


The branch OpenSSL_1_1_0-stable has been updated
       via  0401110073cd392602855f9b72af2ebec7909625 (commit)
      from  574496c0537ac12b3e313fbcfe271e5e609388ae (commit)


- Log -----------------------------------------------------------------
commit 0401110073cd392602855f9b72af2ebec7909625
Author: Richard Levitte <levitte at openssl.org>
Date:   Fri Jul 28 13:38:03 2017 +0200

    Perl: Use File::Glob::bsd_glob 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.
    
    So instead, use a construction that makes the caller glob() use
    File::Glob::bsd_glob().
    
    Note that we're still excluding VMS, as it's directory specs use '['
    and ']', which have a different meaning with bsd_glob and would need
    some extra quoting.  This might change, but later.
    
    Reviewed-by: Rich Salz <rsalz at openssl.org>
    (Merged from https://github.com/openssl/openssl/pull/4040)
    
    (cherry picked from commit 102c9e1296b656c4049c1110abc8a52b43bd0dcf)

-----------------------------------------------------------------------

Summary of changes:
 Configure                      | 2 +-
 test/build.info                | 2 +-
 test/recipes/40-test_rehash.t  | 2 +-
 test/recipes/80-test_ssl_new.t | 2 +-
 test/run_tests.pl              | 2 +-
 util/process_docs.pl           | 2 +-
 6 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/Configure b/Configure
index 33d2392..8e1b25f 100755
--- a/Configure
+++ b/Configure
@@ -14,7 +14,7 @@ use strict;
 use File::Basename;
 use File::Spec::Functions qw/:DEFAULT abs2rel rel2abs/;
 use File::Path qw/mkpath/;
-use if $^O ne "VMS", 'File::Glob' => qw/glob/;
+use if $^O ne "VMS", 'File::Glob' => qw/:bsd_glob/;
 
 # see INSTALL for instructions.
 
diff --git a/test/build.info b/test/build.info
index ef968e6..8303947 100644
--- a/test/build.info
+++ b/test/build.info
@@ -293,7 +293,7 @@ ENDIF
 {-
    use File::Spec::Functions;
    use File::Basename;
-   use if $^O ne "VMS", 'File::Glob' => qw/glob/;
+   use if $^O ne "VMS", 'File::Glob' => qw/:bsd_glob/;
 
    my @nogo_headers = ( "asn1_mac.h",
                         "__decc_include_prologue.h",
diff --git a/test/recipes/40-test_rehash.t b/test/recipes/40-test_rehash.t
index f902c23..b374e59 100644
--- a/test/recipes/40-test_rehash.t
+++ b/test/recipes/40-test_rehash.t
@@ -13,7 +13,7 @@ use warnings;
 use File::Spec::Functions;
 use File::Copy;
 use File::Basename;
-use if $^O ne "VMS", 'File::Glob' => qw/glob/;
+use if $^O ne "VMS", 'File::Glob' => qw/:bsd_glob/;
 use OpenSSL::Test qw/:DEFAULT srctop_file/;
 
 setup("test_rehash");
diff --git a/test/recipes/80-test_ssl_new.t b/test/recipes/80-test_ssl_new.t
index 2f6a69a..2009ecf 100644
--- a/test/recipes/80-test_ssl_new.t
+++ b/test/recipes/80-test_ssl_new.t
@@ -12,7 +12,7 @@ use warnings;
 
 use File::Basename;
 use File::Compare qw/compare_text/;
-use if $^O ne "VMS", 'File::Glob' => qw/glob/;
+use if $^O ne "VMS", 'File::Glob' => qw/:bsd_glob/;
 
 use OpenSSL::Test qw/:DEFAULT srctop_dir srctop_file/;
 use OpenSSL::Test::Utils qw/disabled alldisabled available_protocols/;
diff --git a/test/run_tests.pl b/test/run_tests.pl
index e5bc927..51d9900 100644
--- a/test/run_tests.pl
+++ b/test/run_tests.pl
@@ -16,7 +16,7 @@ BEGIN {
 
 use File::Spec::Functions qw/catdir catfile curdir abs2rel rel2abs/;
 use File::Basename;
-use if $^O ne "VMS", 'File::Glob' => qw/glob/;
+use if $^O ne "VMS", 'File::Glob' => qw/:bsd_glob/;
 use Module::Load::Conditional qw(can_load);
 
 my $TAP_Harness = can_load(modules => { 'TAP::Harness' => undef }) 
diff --git a/util/process_docs.pl b/util/process_docs.pl
index 073a3b7..191ec9e 100644
--- a/util/process_docs.pl
+++ b/util/process_docs.pl
@@ -13,7 +13,7 @@ use File::Spec::Functions;
 use File::Basename;
 use File::Copy;
 use File::Path;
-use if $^O ne "VMS", 'File::Glob' => qw/glob/;
+use if $^O ne "VMS", 'File::Glob' => qw/:bsd_glob/;
 use Getopt::Long;
 use Pod::Usage;
 


More information about the openssl-commits mailing list