This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
https://perl5.git.perl.org / perl5.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: a8733f3) | patch
Catch errors earlier in Devel-Peek/t/Peek.t
authorNicolas R <nicolas@atoomic.org>
Thu, 27 Aug 2020 17:40:51 +0000 (12:40 -0500)
committerTony Cook <tony@develop-help.com>
Thu, 5 Nov 2020 00:07:41 +0000 (00:07 +0000)
commitcaf6f170e537c7fc6aa8802adde54d86ff2009a2
treedd72188284d95d90461cf113cbdd31ace8943653tree | snapshot
parenta8733f32d9a42aca02e91931b2b4c2a5f8979ab5commit | diff
Catch errors earlier in Devel-Peek/t/Peek.t

When testing Devel-Peek we can run some tests
inside an eval and do not bother to check if it
succeeds or not.

As STDERR is redirected to a file, we do not even
notice the error message when an error occurs.

This commit postpones the redirection of STDERR
and 'die' if the eval quoted string from `do_test` fails.
ext/Devel-Peek/t/Peek.t diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.