Require a recent bugfixed Devel::Cycle

diff --git a/Makefile.PL b/Makefile.PL
index d8225bc..17871b8 100644 (file)
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -71,6 +71,7 @@ my %force_requires_if_author = (
 
   # t/52cycle.t
   'Test::Memory::Cycle'       => 0,
+  'Devel::Cycle'              => 1.10,
 
   # t/60core.t
   'DateTime::Format::MySQL'   => 0,

diff --git a/t/52cycle.t b/t/52cycle.t
index 0c1e330..8be1768 100644 (file)
--- a/t/52cycle.t
+++ b/t/52cycle.t
@@ -5,9 +5,9 @@ use Test::More;
 use lib qw(t/lib);
 
 BEGIN {
-  eval { require Test::Memory::Cycle };
-  if ($@) {
-    plan skip_all => "leak test needs Test::Memory::Cycle";
+  eval { require Test::Memory::Cycle; require Devel::Cycle };
+  if ($@ or Devel::Cycle->VERSION < 1.10) {
+    plan skip_all => "leak test needs Test::Memory::Cycle and Devel::Cycle >= 1.10";
   } else {
     plan tests => 1;
   }