about summary refs log tree commit homepage
path: root/t
diff options
context:
space:
mode:
authorEric Wong <e@80x24.org>2021-04-28 07:52:00 +0000
committerEric Wong <e@80x24.org>2021-04-28 19:30:56 +0000
commit9d0d8caf8d9c5eb3afc0c862bdddb2ec310259f5 (patch)
tree18de7fe1b44d9bad7302f4c8647aa4d4b7863202 /t
parent89e75b356ba23eb3fea488a86d4850ae486a32c6 (diff)
downloadpublic-inbox-9d0d8caf8d9c5eb3afc0c862bdddb2ec310259f5.tar.gz
This may help track down some "make check-run" failures
that don't seem to manifest under "make check".
Diffstat (limited to 't')
-rwxr-xr-xt/run.perl7
1 files changed, 7 insertions, 0 deletions
diff --git a/t/run.perl b/t/run.perl
index f4e235b7..2fbe4033 100755
--- a/t/run.perl
+++ b/t/run.perl
@@ -52,6 +52,13 @@ if (!$ENV{TEST_LEI_DAEMON_PERSIST_DIR} &&
         chomp $lei_daemon_pid;
         $lei_daemon_pid =~ /\A[0-9]+\z/ or die "no daemon pid: $lei_daemon_pid";
         kill(0, $lei_daemon_pid) or die "kill $lei_daemon_pid: $!";
+        if (my $t = $ENV{GNU_TAIL}) {
+                system("$t --pid=$lei_daemon_pid -F " .
+                        "$lei_env->{XDG_RUNTIME_DIR}/lei/errors.log >&2 &");
+        }
+        if (my $strace_cmd = $ENV{STRACE_CMD}) {
+                system("$strace_cmd -p $lei_daemon_pid &");
+        }
         $owner_pid = $$;
 }