In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/5654fe3cb7747930ab73ec2386527c2d0007459f?hp=35a2929bb8afc786379fa44c650f7c35377c74f7>
- Log ----------------------------------------------------------------- commit 5654fe3cb7747930ab73ec2386527c2d0007459f Author: Dan Collins <[email protected]> Date: Thu Sep 29 11:23:00 2016 -0400 RT #116250: Fail the right number of tests on timeout Committer: Correct syntax error. Correct RT # in commit message. ----------------------------------------------------------------------- Summary of changes: dist/Tie-File/t/29_downcopy.t | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/dist/Tie-File/t/29_downcopy.t b/dist/Tie-File/t/29_downcopy.t index d75806d..51c941c 100644 --- a/dist/Tie-File/t/29_downcopy.t +++ b/dist/Tie-File/t/29_downcopy.t @@ -279,6 +279,11 @@ sub try { print "# Timeout\n"; print "not ok $N\n"; $N++; print "not ok $N\n"; $N++; + if (defined $len) { + # Fail the tests in the recursive call as well + print "not ok $N\n"; $N++; + print "not ok $N\n"; $N++; + } return; } else { $@ = $err; -- Perl5 Master Repository
