use defined-or in a few more places

[public-inbox.git] / xt / create-many-inboxes.t

diff --git a/xt/create-many-inboxes.t b/xt/create-many-inboxes.t
index c92643b2d33eb26a803113a0fc1231ad50e94275..f44334cce6dd9e383c5168ea24980725d7a85f81 100644 (file)
--- a/xt/create-many-inboxes.t
+++ b/xt/create-many-inboxes.t
@@ -1,5 +1,5 @@
 #!perl -w
-# Copyright (C) 2020 all contributors <meta@public-inbox.org>
+# Copyright (C) 2020-2021 all contributors <meta@public-inbox.org>
 # License: AGPL-3.0+ <https://www.gnu.org/licenses/agpl-3.0.txt>
 use strict;
 use Test::More;
@@ -68,7 +68,7 @@ my @children;
 for my $i (1..$nproc) {
        my ($r, $w);
        pipe($r, $w) or BAIL_OUT $!;
-       my $pid = fork;
+       my $pid = fork // BAIL_OUT "fork: $!";
        if ($pid == 0) {
                close $w;
                while (my $i = <$r>) {
@@ -77,7 +77,6 @@ for my $i (1..$nproc) {
                }
                _exit(0);
        }
-       defined $pid or BAIL_OUT "fork: $!";
        close $r or BAIL_OUT $!;
        push @children, [ $w, $pid ];
        $w->autoflush(1);