]> Sergey Matveev's repositories - public-inbox.git/blobdiff - t/httpd-unix.t
t/httpd-unix.t: stop tail(1) before stopping server
[public-inbox.git] / t / httpd-unix.t
index c45ff1633f0f68ef148985b330342772d94752d2..414ca0c8b979c5c9b5b12d084f71e508bef5e48a 100644 (file)
@@ -136,6 +136,7 @@ SKIP: {
                my $pid = $read_pid->($pid_file);
                is(kill('TERM', $pid), 1, "signaled daemonized $w process");
                vec(my $rvec = '', fileno($p0), 1) = 1;
+               delete $td->{-extra}; # drop tail(1) process
                is(select($rvec, undef, undef, 1), 1, 'timeout for pipe HUP');
                is(my $undef = <$p0>, undef, 'process closed pipe writer at exit');
                ok(!-e $pid_file, "$w pid file unlinked at exit");