Fix warning.

[perl5.git] / lib / ExtUtils / t / prereq_print.t

diff --git a/lib/ExtUtils/t/prereq_print.t b/lib/ExtUtils/t/prereq_print.t
index 78dc6e8..1dc0702 100644 (file)
--- a/lib/ExtUtils/t/prereq_print.t
+++ b/lib/ExtUtils/t/prereq_print.t
@@ -13,8 +13,17 @@ BEGIN {
 use strict;
 use Config;
 
-use Test::More tests => 8;
+use Test::More;
+
+unless( eval { require Data::Dumper } ) {
+    plan skip_all => 'Data::Dumper not available';
+}
+
+plan tests => 11;
+
+
 use MakeMaker::Test::Utils;
+use MakeMaker::Test::Setup::BFD;
 
 # 'make disttest' sets a bunch of environment variables which interfere
 # with our testing.
@@ -24,11 +33,17 @@ my $Perl = which_perl();
 my $Makefile = makefile_name();
 my $Is_VMS = $^O eq 'VMS';
 
-chdir($Is_VMS ? 'BFD_TEST_ROOT:[t]' : 't');
+chdir 't';
 perl_lib;
 
 $| = 1;
 
+ok( setup_recurs(), 'setup' );
+END {
+    ok( chdir File::Spec->updir );
+    ok( teardown_recurs(), 'teardown' );
+}
+
 ok( chdir('Big-Dummy'), "chdir'd to Big-Dummy" ) ||
   diag("chdir failed: $!");