No ext_urls

[public-inbox.git] / t / gcf2.t

diff --git a/t/gcf2.t b/t/gcf2.t
index 35b2f113e372320b964e9c2063291bfaa8c5a3a8..d12a4420b5c01099bbb0b8bbd0ef8d94460afb8a 100644 (file)
--- a/t/gcf2.t
+++ b/t/gcf2.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 PublicInbox::TestCommon;
@@ -114,7 +114,7 @@ SKIP: {
                $w->blocking($blk);
                seek($fh, 0, SEEK_SET) or BAIL_OUT "seek: $!";
                truncate($fh, 0) or BAIL_OUT "truncate: $!";
-               defined(my $pid = fork) or BAIL_OUT "fork: $!";
+               my $pid = fork // BAIL_OUT "fork: $!";
                if ($pid == 0) {
                        close $w;
                        tick; # wait for parent to block on writev