Catch test file exceptions

[colorize.git] / test.pl

diff --git a/test.pl b/test.pl
index 30c1fd142026567ab241a937b88b7fd73d425cec..776b8a2d96a8bb01e7ebca4d41fe486e3e61426c 100755 (executable)
--- a/test.pl
+++ b/test.pl
@@ -33,7 +33,7 @@ my $write_to_tmpfile = sub
 
 {
     my @test_files = glob('t/*.t');
-    runtests(@test_files);
+    eval { runtests(@test_files) } or warn $@;
 }
 
 plan tests => $tests;