X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2FTest%2FValgrind.pm;h=838a3ae777223ad0952cf5862de84a7d8d37b399;hb=abef72093aab236f819fb3f3dcc6b890895451c4;hp=29e88580d63def80614a37f1a01c4b5f612ff21d;hpb=125f225e5480a277cbfb33004b6f567383296a48;p=perl%2Fmodules%2FTest-Valgrind.git diff --git a/lib/Test/Valgrind.pm b/lib/Test/Valgrind.pm index 29e8858..838a3ae 100644 --- a/lib/Test/Valgrind.pm +++ b/lib/Test/Valgrind.pm @@ -134,7 +134,7 @@ sub import { print STDERR "valgrind @args\n" if $args{diag}; local $ENV{PERL_DESTRUCT_LEVEL} = 3; local $ENV{PERL_DL_NONLAZY} = 1; - exec $vg, @args if $vg and -x $vg; + exec $vg, @args; } close $wtr or croak "close(\$wtr): $!"; local $SIG{INT} = sub { kill -(SIGTERM) => $pid };