1#!/usr/bin/perl -w
2
3BEGIN {
4    unshift @INC, 't/lib';
5}
6
7use strict;
8use Test::More tests => 7;
9
10use MakeMaker::Test::Setup::BFD;
11use MakeMaker::Test::Utils;
12
13chdir 't';
14perl_lib; # sets $ENV{PERL5LIB} relative to t/
15
16use File::Temp qw[tempdir];
17my $tmpdir = tempdir( DIR => '../t', CLEANUP => 1 );
18use Cwd; my $cwd = getcwd; END { chdir $cwd } # so File::Temp can cleanup
19chdir $tmpdir;
20
21my $perl = which_perl();
22my $make = make_run();
23
24ok( setup_recurs(), 'setup' );
25END {
26    ok( chdir File::Spec->updir, 'chdir updir' );
27    ok( teardown_recurs(), 'teardown' );
28}
29
30ok( chdir('Big-Dummy'), "chdir'd to Big-Dummy" ) ||
31  diag("chdir failed: $!");
32
33my @mpl_out = run(qq{$perl Makefile.PL FIRST_MAKEFILE=jakefile});
34cmp_ok( $?, '==', 0, 'Makefile.PL exited with zero' ) || diag @mpl_out;
35
36ok( -e 'jakefile', 'FIRST_MAKEFILE honored' );
37
38ok( grep(/^Writing jakefile(?:\.)? for Big::Dummy/, @mpl_out) == 1,
39    'Makefile.PL output looks right' );
40