From: Peter Rabbitson <ribasushi@cpan.org>
Date: Sun, 5 Feb 2012 13:20:11 +0000 (+0100)
Subject: Fix failures on 5.13.6, RT#74683, Zefram++
X-Git-Tag: 0.23~2
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=b927cca7f4a72f6afecaf1e2d0e6bfddad02f043;p=p5sagit%2Fnamespace-clean.git

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

diff --git a/Changes b/Changes
index e472e34..787d0a1 100644
--- 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
--- 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
--- 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};