Fix failures on 5.13.6, RT#74683, Zefram++

diff --git a/Changes b/Changes
index e472e34..787d0a1 100644 (file)
--- a/Changes
+++ b/Changes
@@ -1,3 +1,6 @@
+        - Fix failures on 5.13.6 due to incorrect version number threshold
+          (RT#74683)
+
     [0.22] (official fix of all the %^H ickyness)
         - Simplify the >= 5.10 PP variant even more - move the hook from
           DESTROY into DELETE

diff --git a/Makefile.PL b/Makefile.PL
index 1deccc5..7898c88 100644 (file)
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -19,7 +19,7 @@ my %OPT_RUN_DEPS = (can_cc() ? (
   'B::Hooks::EndOfScope' => '0.07', # when changing, also change $b_h_eos_req in namespace/clean.pm
 
   # these pieces are needed if using the debugger on the perl range
-  ($] > 5.008_008_9 && $] < 5.013_006_1)
+  ($] > 5.008_008_9 && $] < 5.013_005_1)
     ? ( 'Sub::Name' => '0.04', 'Sub::Identify' => '0.04' ) # when changing, also change $sn_ver and $si_ver in namespace/clean.pm
     : ()
   ,

diff --git a/lib/namespace/clean.pm b/lib/namespace/clean.pm
index e73f348..8ac9367 100644 (file)
--- a/lib/namespace/clean.pm
+++ b/lib/namespace/clean.pm
@@ -166,7 +166,7 @@ it is your responsibility to make sure it runs at that time.
 
 # Constant to optimise away the unused code branches
 use constant FIXUP_NEEDED => $] < 5.015_005_1;
-use constant FIXUP_RENAME_SUB => $] > 5.008_008_9 && $] < 5.013_006_1;
+use constant FIXUP_RENAME_SUB => $] > 5.008_008_9 && $] < 5.013_005_1;
 {
   no strict;
   delete ${__PACKAGE__."::"}{FIXUP_NEEDED};