xref: /onnv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/ExtUtils/t/backwards.t (revision 0:68f95e015346)
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
6BEGIN {
7    if( $ENV{PERL_CORE} ) {
8        chdir 't' if -d 't';
9        @INC = ('../lib', 'lib');
10    }
11    else {
12        unshift @INC, 't/lib';
13    }
14}
15
16use strict;
17use Test::More tests => 2;
18
19require ExtUtils::MakeMaker;
20
21# CPAN.pm wants MM.
22can_ok('MM', 'new');
23
24# Pre 5.8 ExtUtils::Embed wants MY.
25can_ok('MY', 'catdir');
26