Regexp::DESTROY was only added in 5.8.1

p4raw-id: //depot/perl@33503

diff --git a/ext/Opcode/Safe.pm b/ext/Opcode/Safe.pm
index 04a3b55..f611e0f 100644 (file)
--- a/ext/Opcode/Safe.pm
+++ b/ext/Opcode/Safe.pm
@@ -3,7 +3,7 @@ package Safe;
 use 5.003_11;
 use strict;
 
-$Safe::VERSION = "2.15";
+$Safe::VERSION = "2.16";
 
 # *** Don't declare any lexicals above this point ***
 #
@@ -46,7 +46,6 @@ my $default_root  = 0;
 my $default_share = [qw[
     *_
     &PerlIO::get_layers
-    &Regexp::DESTROY
     &UNIVERSAL::isa
     &UNIVERSAL::can
     &UNIVERSAL::VERSION
@@ -61,7 +60,9 @@ my $default_share = [qw[
     $version::VERSION
     $version::CLASS
     @version::ISA
-], ($] >= 5.010 && qw[
+], ($] >= 5.008001 && qw[
+    &Regexp::DESTROY
+]), ($] >= 5.010 && qw[
     &re::is_regexp
     &re::regname
     &re::regnames