my $output;
my $parser = TAP::Parser->new({
- exec => [ 'sh', '-c', "DISPLAY=$display /usr/bin/perl -It/lib $test" ],
+ exec => [ 'sh', '-c', qq|DISPLAY=$display LOGPATH="$logpath" /usr/bin/perl -It/lib $test| ],
spool => IO::Scalar->new(\$output),
merge => 1,
});
say $fh "ipc-socket $tmp_socket_path";
close($fh);
- my $i3cmd = "exec " . abs_path("../i3") . " -V -d all --disable-signalhandler -c $tmpfile >/dev/null 2>/dev/null";
+ # Use $ENV{LOGPATH}, gets set in complete-run.pl. We append instead of
+ # overwrite because there might be multiple instances of i3 running during
+ # one test case.
+ my $i3cmd = "exec " . abs_path("../i3") . " -V -d all --disable-signalhandler -c $tmpfile >>$ENV{LOGPATH} 2>&1";
my $process = Proc::Background->new($i3cmd);
sleep 1;