don't let bugs in Test::DM cause the whole thing to bomb out
Jesse Luehrs [Tue, 10 Apr 2012 01:01:03 +0000 (20:01 -0500)]
xt/author/test-my-dependents.t

index b89d855..e256a6d 100644 (file)
@@ -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: $@");
     }
 }