Change 33503: Regexp::DESTROY was only added in 5.8.1

[Rafael Garcia-Suarez]

Change 33503 by [EMAIL PROTECTED] on 2008/03/13 10:43:13

        Regexp::DESTROY was only added in 5.8.1

Affected files ...

... //depot/perl/ext/Opcode/Safe.pm#35 edit

Differences ...

==== //depot/perl/ext/Opcode/Safe.pm#35 (text) ====
Index: perl/ext/Opcode/Safe.pm
--- perl/ext/Opcode/Safe.pm#34~33238~   2008-02-05 08:51:40.000000000 -0800
+++ perl/ext/Opcode/Safe.pm     2008-03-13 03:43:13.000000000 -0700
@@ -3,7 +3,7 @@
 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_share = [qw[
     *_
     &PerlIO::get_layers
-    &Regexp::DESTROY
     &UNIVERSAL::isa
     &UNIVERSAL::can
     &UNIVERSAL::VERSION
@@ -61,7 +60,9 @@
     $version::VERSION
     $version::CLASS
     @version::ISA
-], ($] >= 5.010 && qw[
+], ($] >= 5.008001 && qw[
+    &Regexp::DESTROY
+]), ($] >= 5.010 && qw[
     &re::is_regexp
     &re::regname
     &re::regnames
End of Patch.