diff options
author | Karl Williamson <khw@cpan.org> | 2020-03-07 12:54:19 -0700 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2020-11-29 08:08:46 -0700 |
commit | b0312014d6c1804920d2b687a5fa5645b445ce9f (patch) | |
tree | c9ee06aa057b18e9377a8785ff12818648da3aa1 /ext/DynaLoader | |
parent | 1d6cadf136bf2c85058a5359fb48b09b3ea9fe6f (diff) | |
download | perl-b0312014d6c1804920d2b687a5fa5645b445ce9f.tar.gz |
DynaLoader: use PerlEnv_getenv()
Doing so invokes thread-safe guards
Diffstat (limited to 'ext/DynaLoader')
-rw-r--r-- | ext/DynaLoader/DynaLoader_pm.PL | 2 | ||||
-rw-r--r-- | ext/DynaLoader/dlutils.c | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/ext/DynaLoader/DynaLoader_pm.PL b/ext/DynaLoader/DynaLoader_pm.PL index 86a1128f26..f68d59aa7e 100644 --- a/ext/DynaLoader/DynaLoader_pm.PL +++ b/ext/DynaLoader/DynaLoader_pm.PL @@ -88,7 +88,7 @@ package DynaLoader; # Tim.Bunce@ig.co.uk, August 1994 BEGIN { - $VERSION = '1.48'; + $VERSION = '1.49'; } EOT diff --git a/ext/DynaLoader/dlutils.c b/ext/DynaLoader/dlutils.c index 8584f89e6b..1a27fbdd20 100644 --- a/ext/DynaLoader/dlutils.c +++ b/ext/DynaLoader/dlutils.c @@ -115,7 +115,7 @@ dl_generic_private_init(pTHX) /* called by dl_*.xs dl_private_init() */ #endif #if defined(PERL_IN_DL_HPUX_XS) || defined(PERL_IN_DL_DLOPEN_XS) - if ( (perl_dl_nonlazy = getenv("PERL_DL_NONLAZY")) != NULL + if ( (perl_dl_nonlazy = PerlEnv_getenv("PERL_DL_NONLAZY")) != NULL && grok_atoUV(perl_dl_nonlazy, &uv, NULL) && uv <= INT_MAX ) { |