Output more diagnostics when 'use Test::Valgrind' fails

[perl/modules/Test-Valgrind.git] / t / 30-bad.t

diff --git a/t/30-bad.t b/t/30-bad.t
index 2237a7e47f425a986e48c177a8da26cb6c6b72cc..4250639846c86dfe876be3116b13526d9e657d2c 100644 (file)
--- a/t/30-bad.t
+++ b/t/30-bad.t
@@ -31,7 +31,7 @@ sub tester {
 
 eval "
  require XSLoader;
- XSLoader::load('Test::Valgrind', 0.051);
+ XSLoader::load('Test::Valgrind', 0.06);
 ";
 if ($@) {
  plan skip_all => "XS test code not available ($@)";
@@ -39,6 +39,7 @@ if ($@) {
  use lib qw{blib/archpub};
  eval 'use Test::Valgrind cb => \&tester;';
  if ($@) {
+  diag $@;
   plan skip_all => 'Test::Valgrind is required to run test your distribution with valgrind';
  } else {
   Test::Valgrind::leak();