X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/2c91f887f15419ab4d5271c3d098f5e3c98ff314..52a0f4ccb02fbcfcbdb9502ee6f9781ae1488dd7:/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 --- 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: $!");