diff options
| author | Todd Rinaldo <toddr@cpan.org> | 2015-08-26 15:21:22 -0500 |
|---|---|---|
| committer | Tony Cook <tony@develop-help.com> | 2015-08-27 11:42:44 +1000 |
| commit | d2a9272722b0e544c349fbad8e2f2feba3cce4dd (patch) | |
| tree | 8167e13ddb8e95c88628cc7430e6907c72fead2d /ext/DynaLoader | |
| parent | 194e5090d23ea35a046eac37a5d4af6db452bb54 (diff) | |
| download | perl-d2a9272722b0e544c349fbad8e2f2feba3cce4dd.tar.gz | |
Do not inject use Config into Dynaloader.pm when PERL_BUILD_EXPAND_CONFIG_VARS
The rest of the file automatically expanded Config variables, however the
module was still accidentally loaded. This commit corrects the oversight.
Diffstat (limited to 'ext/DynaLoader')
| -rw-r--r-- | ext/DynaLoader/DynaLoader_pm.PL | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/ext/DynaLoader/DynaLoader_pm.PL b/ext/DynaLoader/DynaLoader_pm.PL index c7ae0498f2..45b932f2cb 100644 --- a/ext/DynaLoader/DynaLoader_pm.PL +++ b/ext/DynaLoader/DynaLoader_pm.PL @@ -85,10 +85,16 @@ package DynaLoader; # Tim.Bunce@ig.co.uk, August 1994 BEGIN { - $VERSION = '1.33'; + $VERSION = '1.34'; } -use Config; +EOT + +if (!$ENV{PERL_BUILD_EXPAND_CONFIG_VARS}) { + print OUT "use Config;\n"; +} + +print OUT <<'EOT'; # enable debug/trace messages from DynaLoader perl code $dl_debug = $ENV{PERL_DL_DEBUG} || 0 unless defined $dl_debug; |