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