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' );