[p5sagit/p5-mst-13.2.git] / ext / ExtUtils-MakeMaker / t / backwards.t

#!/usr/bin/perl -w

# This is a test for all the odd little backwards compatible things
# MakeMaker has to support.  And we do mean backwards.

BEGIN {
    unshift @INC, 't/lib';
}

use strict;
use Test::More tests => 2;

require ExtUtils::MakeMaker;

# CPAN.pm wants MM.
can_ok('MM', 'new');

# Pre 5.8 ExtUtils::Embed wants MY.
can_ok('MY', 'catdir');
Commit	Line	Data
45bc4d3a	1	#!/usr/bin/perl -w
	2
	3	# This is a test for all the odd little backwards compatible things
	4	# MakeMaker has to support. And we do mean backwards.
	5
	6	BEGIN {
b78fd716	7	unshift @INC, 't/lib';
45bc4d3a	8	}
	9
	10	use strict;
	11	use Test::More tests => 2;
	12
	13	require ExtUtils::MakeMaker;
	14
	15	# CPAN.pm wants MM.
	16	can_ok('MM', 'new');
	17
	18	# Pre 5.8 ExtUtils::Embed wants MY.
	19	can_ok('MY', 'catdir');