]> git.sur5r.net Git - i3/i3/commitdiff
tests: also make launch_with_config() log to LOGPATH
authorMichael Stapelberg <michael@stapelberg.de>
Sun, 18 Sep 2011 14:35:04 +0000 (15:35 +0100)
committerMichael Stapelberg <michael@stapelberg.de>
Sun, 18 Sep 2011 14:35:04 +0000 (15:35 +0100)
testcases/complete-run.pl
testcases/t/lib/i3test.pm

index 6f00877cbf694e7b59582accbf2024db0e55f6bc..8f740d8caf2965cafb5bc4b535bb8f02ace36b71 100755 (executable)
@@ -242,7 +242,7 @@ sub take_job {
 
         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,
         });
index 749b89b77d4df4290cb8aecdffd3a28b73999e6e..3d2d85afbc944823b08fac0b253dd9314687551c 100644 (file)
@@ -259,7 +259,10 @@ sub launch_with_config {
     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;