about summary refs log tree commit homepage
path: root/t/run.perl
diff options
context:
space:
mode:
authorEric Wong <e@80x24.org>2021-01-24 22:41:58 -0800
committerEric Wong <e@80x24.org>2021-01-26 18:51:31 +0000
commitda86f10a548d4cce25f91bb4063f82ecbbe441a1 (patch)
treee19b26c90c73a05fd08f5f9796fb5fcb57563200 /t/run.perl
parent99d3f175072a8ef062ba6335a3ceb267ba89c12b (diff)
downloadpublic-inbox-da86f10a548d4cce25f91bb4063f82ecbbe441a1.tar.gz
Mainly around fork() calls, but some nearby places as well.
Diffstat (limited to 't/run.perl')
-rwxr-xr-xt/run.perl2
1 files changed, 1 insertions, 1 deletions
diff --git a/t/run.perl b/t/run.perl
index b7cb988b..96db3045 100755
--- a/t/run.perl
+++ b/t/run.perl
@@ -128,7 +128,7 @@ my $eof; # we stop respawning if true
 
 my $start_worker = sub {
         my ($i, $j, $rd, $todo) = @_;
-        defined(my $pid = fork) or DIE "fork: $!";
+        my $pid = fork // DIE "fork: $!";
         if ($pid == 0) {
                 $worker = $$;
                 while (1) {