projects
/
p5sagit/p5-mst-13.2.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
Fix a couple of typos.
[p5sagit/p5-mst-13.2.git]
/
mg.c
diff --git
a/mg.c
b/mg.c
index
d8e17dd
..
b5a9290
100644
(file)
--- a/
mg.c
+++ b/
mg.c
@@
-1082,6
+1082,7
@@
Perl_magic_clear_all_env(pTHX_ SV *sv, MAGIC *mg)
# endif
{
# ifndef PERL_USE_SAFE_PUTENV
+ if (!PL_use_safe_putenv) {
I32 i;
if (environ == PL_origenviron)
@@
-1089,6
+1090,7
@@
Perl_magic_clear_all_env(pTHX_ SV *sv, MAGIC *mg)
else
for (i = 0; environ[i]; i++)
safesysfree(environ[i]);
+ }
# endif /* PERL_USE_SAFE_PUTENV */
environ[0] = Nullch;