don't let bugs in Test::DM cause the whole thing to bomb out

[gitmo/Moose.git] / xt / author / test-my-dependents.t

diff --git a/xt/author/test-my-dependents.t b/xt/author/test-my-dependents.t
index b89d855..e256a6d 100644 (file)
--- a/xt/author/test-my-dependents.t
+++ b/xt/author/test-my-dependents.t
@@ -89,10 +89,13 @@ for my $module (@modules) {
         my $reason = $skip_reasons{$module};
         $reason = '???' unless defined $reason;
         local $Test::DependentModules::TODO = $reason;
-        test_module($module);
+        local $TODO = $reason;
+        eval { test_module($module); 1 }
+            or fail("Died when testing $module: $@");
     }
     else {
-        test_module($module);
+        eval { test_module($module); 1 }
+            or fail("Died when testing $module: $@");
     }
 }