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

diff --git a/t/10-suppressions.t b/t/10-suppressions.t
index 9dc37d9..935dfbe 100644
--- a/t/10-suppressions.t
+++ b/t/10-suppressions.t
@@ -2,10 +2,12 @@
 
 use strict;
 use warnings;
-use Test::More tests => 1;
+use Test::More tests => 2;
 
-use Test::Valgrind::Suppressions qw/supppath/;
+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');