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