Importing Test-Valgrind-0.02.tar.gz

[perl/modules/Test-Valgrind.git] / t / 10-suppressions.t

diff --git a/t/10-suppressions.t b/t/10-suppressions.t
index 9dc37d9e73ff75131c01bedf5c25f3673d67579a..935dfbee5011d98d7388764c39b8c3f15766ae3b 100644 (file)
--- 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');