X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FTest-Valgrind.git;a=blobdiff_plain;f=lib%2FTest%2FValgrind%2FAction%2FTest.pm;h=48d5906636f2247348ae4f484479e245bd5a6998;hp=182f2822605d1859f09d96221a475dbfd9de33a5;hb=9da4ddc479c87b233cc7b2b182ca83c545f57065;hpb=f229eb96e8c03a16ac13b617542554b44023c510

diff --git a/lib/Test/Valgrind/Action/Test.pm b/lib/Test/Valgrind/Action/Test.pm
index 182f282..48d5906 100644
--- a/lib/Test/Valgrind/Action/Test.pm
+++ b/lib/Test/Valgrind/Action/Test.pm
@@ -110,10 +110,10 @@ sub abort {
  my $tb = Test::Builder->new;
  my $plan = $tb->has_plan;
  if (defined $plan) {
-  $tb->BAIL_OUT($@);
+  $tb->BAIL_OUT($msg);
   $self->{status} = 255;
  } else {
-  $tb->skip_all($@);
+  $tb->skip_all($msg);
   $self->{status} = 0;
  }