X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=t%2Fspawn.t;h=44355f43655582845755b674847494eb18b5df4c;hb=95bdac7f09c69036efed537a4d03d5bdd2ae4eb6;hp=2e4091574e1be4bcbafd91ff851f0938f60557ef;hpb=b82e6c82aedb58309bdcdd041cabb5f82ec62234;p=public-inbox.git diff --git a/t/spawn.t b/t/spawn.t index 2e409157..44355f43 100644 --- a/t/spawn.t +++ b/t/spawn.t @@ -1,4 +1,4 @@ -# Copyright (C) 2015-2019 all contributors +# Copyright (C) 2015-2020 all contributors # License: AGPL-3.0+ use strict; use warnings; @@ -31,7 +31,7 @@ use PublicInbox::Spawn qw(which spawn popen_rd); my ($r, $w); pipe $r, $w or die "pipe failed: $!"; my $pid = spawn(['sh', '-c', 'echo $HELLO'], - { 'HELLO' => 'world' }, { 1 => fileno($w) }); + { 'HELLO' => 'world' }, { 1 => $w }); close $w or die "close pipe[1] failed: $!"; is(<$r>, "world\n", 'read stdout of spawned from pipe'); is(waitpid($pid, 0), $pid, 'waitpid succeeds on spawned process');