From 58e6ee9df4f74b1078541c8924cf2918ceec0765 Mon Sep 17 00:00:00 2001 From: Konstantin Ryabitsev Date: Tue, 14 Nov 2023 15:16:37 -0500 Subject: TestCommon: older strace does not have --version The tests will check for strace >= 4.16, but version 4.24 that I have does not accept --version, only -V. This works for both older and newer strace, so switch to using "strace -V" for the check. Signed-off-by: Konstantin Ryabitsev --- lib/PublicInbox/TestCommon.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lib/PublicInbox/TestCommon.pm') diff --git a/lib/PublicInbox/TestCommon.pm b/lib/PublicInbox/TestCommon.pm index caf709c2..a5546905 100644 --- a/lib/PublicInbox/TestCommon.pm +++ b/lib/PublicInbox/TestCommon.pm @@ -956,9 +956,9 @@ sub strace_inject (;$) { my $cmd = strace(@_); state $ver = do { require PublicInbox::Spawn; - my $v = PublicInbox::Spawn::run_qx([$cmd, '--version']); + my $v = PublicInbox::Spawn::run_qx([$cmd, '-V']); $v =~ m!version\s+([1-9]+\.[0-9]+)! or - xbail "no strace --version: $v"; + xbail "no strace -V: $v"; eval("v$1"); }; $ver ge v4.16 or skip "$cmd too old for syscall injection (". -- cgit v1.2.3-24-ge0c7