summaryrefslogtreecommitdiff
path: root/dbug/tests-t.pl
diff options
context:
space:
mode:
Diffstat (limited to 'dbug/tests-t.pl')
-rwxr-xr-xdbug/tests-t.pl5
1 files changed, 3 insertions, 2 deletions
diff --git a/dbug/tests-t.pl b/dbug/tests-t.pl
index de9ed6f6ab9..9f517ba3efd 100755
--- a/dbug/tests-t.pl
+++ b/dbug/tests-t.pl
@@ -8,8 +8,9 @@
use Test::More;
$exe=$0;
+$exe =~ s@[^/]+$@tests@;
-die unless $exe =~ s/(tests)-t(\.exe)?$/$1$2 /;
+die unless -x $exe;
# load tests
@tests=();
@@ -28,7 +29,7 @@ plan skip_all => "because dbug is disabled" if system $exe;
plan tests => scalar(@tests);
for (@tests) {
- $t=$exe . shift @$_;
+ $t=$exe . ' ' . shift @$_;
chomp($t);
open F, '-|', $t or die "open($t|): $!";
local $";