[p5sagit/p5-mst-13.2.git] / lib / ExtUtils / MakeMaker / Config.pm

package ExtUtils::MakeMaker::Config;

$VERSION = '0.02';

use strict;
use Config ();

# Give us an overridable config.
use vars qw(%Config);
%Config = %Config::Config;

sub import {
    my $caller = caller;

    no strict 'refs';
    *{$caller.'::Config'} = \%Config;
}

1;


=head1 NAME

ExtUtils::MakeMaker::Config - Wrapper around Config.pm


=head1 SYNOPSIS

  use ExtUtils::MakeMaker::Config;
  print $Config{installbin};  # or whatever


=head1 DESCRIPTION

B<FOR INTERNAL USE ONLY>

A very thin wrapper around Config.pm so MakeMaker is easier to test.

=cut
Commit	Line	Data
7292dc67	1	package ExtUtils::MakeMaker::Config;
	2
	3	$VERSION = '0.02';
	4
	5	use strict;
	6	use Config ();
	7
	8	# Give us an overridable config.
	9	use vars qw(%Config);
	10	%Config = %Config::Config;
	11
	12	sub import {
	13	my $caller = caller;
	14
	15	no strict 'refs';
	16	*{$caller.'::Config'} = \%Config;
	17	}
	18
	19	1;
	20
	21
	22	=head1 NAME
	23
	24	ExtUtils::MakeMaker::Config - Wrapper around Config.pm
	25
	26
	27	=head1 SYNOPSIS
	28
	29	use ExtUtils::MakeMaker::Config;
	30	print $Config{installbin}; # or whatever
	31
	32
	33	=head1 DESCRIPTION
	34
	35	B<FOR INTERNAL USE ONLY>
	36
	37	A very thin wrapper around Config.pm so MakeMaker is easier to test.
	38
	39	=cut