diff options
author | David Golden <dagolden@cpan.org> | 2009-10-01 20:51:30 -0400 |
---|---|---|
committer | David Golden <dagolden@cpan.org> | 2009-10-01 20:51:30 -0400 |
commit | f483babb422bfc83607d05f841bedb2e7366ed9a (patch) | |
tree | be9a3c56cfcc220e2d83072d9a56e38f05ebce19 | |
parent | 19c8b1959f8e62550ec7e54c8a12efbf034555a3 (diff) | |
download | perl-f483babb422bfc83607d05f841bedb2e7366ed9a.tar.gz |
Make t/harness have non-zero exit if tests fail
-rw-r--r-- | t/harness | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -256,5 +256,5 @@ $h->callback( } ); -$h->runtests(@tests); -exit(0); +my $agg = $h->runtests(@tests); +exit $agg->has_errors ? 1 : 0; |