Commit | Line | Data |
---|---|---|
920dae64 AT |
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 |