about summary refs log tree commit homepage
path: root/t/nntpd.t
diff options
context:
space:
mode:
authorEric Wong <e@yhbt.net>2020-04-21 03:22:52 +0000
committerEric Wong <e@yhbt.net>2020-04-21 20:13:53 +0000
commit2289dc4ab72cb31475039e26cb10786e6bf573d2 (patch)
tree8e97a9d545d3753a6bcfef15b59ed88ea72eed98 /t/nntpd.t
parent47f8836273133fb4a13e895feff7f7ee34ae7109 (diff)
downloadpublic-inbox-2289dc4ab72cb31475039e26cb10786e6bf573d2.tar.gz
We need to detect FS errors and bail out on the test
if we can't open a file -nntpd was just writing to.
Diffstat (limited to 't/nntpd.t')
-rw-r--r--t/nntpd.t6
1 files changed, 3 insertions, 3 deletions
diff --git a/t/nntpd.t b/t/nntpd.t
index 2d7280a5..5a3a62fb 100644
--- a/t/nntpd.t
+++ b/t/nntpd.t
@@ -329,12 +329,12 @@ Date: Fri, 02 Oct 1993 00:00:00 +0000
 
         $n = $s = undef;
         $td->join;
-        my $eout = eval {
-                local $/;
+        is($?, 0, 'no error in exited process');
+        my $eout = do {
                 open my $fh, '<', $err or die "open $err failed: $!";
+                local $/;
                 <$fh>;
         };
-        is($?, 0, 'no error in exited process');
         unlike($eout, qr/wide/i, 'no Wide character warnings');
 }