diff options
Diffstat (limited to 'cpan/Test-Simple/t/fail-like.t')
| -rw-r--r-- | cpan/Test-Simple/t/fail-like.t | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/cpan/Test-Simple/t/fail-like.t b/cpan/Test-Simple/t/fail-like.t index 0383094913..19e748f567 100644 --- a/cpan/Test-Simple/t/fail-like.t +++ b/cpan/Test-Simple/t/fail-like.t @@ -22,7 +22,7 @@ package My::Test; # This has to be a require or else the END block below runs before # Test::Builder's own and the ending diagnostics don't come out right. require Test::Builder; -my $TB = Test::Builder->create; +my $TB = Test::Builder->create(); $TB->plan(tests => 4); @@ -71,7 +71,5 @@ OUT } -END { - # Test::More thinks it failed. Override that. - exit(scalar grep { !$_ } $TB->summary); -} +# Test::More thinks it failed. Override that. +Test::Builder->new->no_ending(1); |