From f08d7eef413cee79d771ff55b8faa75da90f38ce Mon Sep 17 00:00:00 2001
From: Andreas Romeyke <andreas.romeyke@slub-dresden.de>
Date: Mon, 18 Nov 2024 10:04:43 +0100
Subject: [PATCH] - fix, improved regex to detect main script sucessfully
---
lib/Test/TA.pm | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/lib/Test/TA.pm b/lib/Test/TA.pm
index 5eac397..a6c9c77 100644
--- a/lib/Test/TA.pm
+++ b/lib/Test/TA.pm
@@ -38,7 +38,7 @@ sub is_testhost_available () {
$searchpath->visit(
sub {
my ($path) = @_;
- $prog = $path if $path =~ m/ta-tool.pl/;
+ $prog = $path if $path =~ m/ta-tool\.pl$/;
},
{ recurse => 1}
);
--
GitLab