X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=t%2F10-suppressions.t;h=ca9db49ff0cc5bb427fb44ff028ce1118a221da3;hb=cb1a72bfb539b0dbb8d56a24d77bfc23d935e397;hp=9dc37d9e73ff75131c01bedf5c25f3673d67579a;hpb=41a4b907f4846f2d35b170f517fb83ceb13f298c;p=perl%2Fmodules%2FTest-Valgrind.git

diff --git a/t/10-suppressions.t b/t/10-suppressions.t
index 9dc37d9..ca9db49 100644
--- a/t/10-suppressions.t
+++ b/t/10-suppressions.t
@@ -2,10 +2,13 @@
 
 use strict;
 use warnings;
-use Test::More tests => 1;
+use Test::More tests => 2;
 
-use Test::Valgrind::Suppressions qw/supppath/;
+use lib qw{blib/archpub};
+use Test::Valgrind::Suppressions qw/supp_path VG_PATH/;
 
-my $path = supppath();
+my $path = supp_path();
 like($path, qr!Test/Valgrind/perlTestValgrind\.supp$!,
      'supppath() returns the path to the suppression file');
+
+isnt(VG_PATH, undef, 'VG_PATH is defined');