summaryrefslogtreecommitdiff
path: root/scope.c
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2010-10-13 17:07:34 +0100
committerNicholas Clark <nick@ccl4.org>2010-10-13 17:07:34 +0100
commitf8fcc4c4d40dffe02ea3730dff8d5723dc1cf0fe (patch)
tree7b7366a784cc442b366144f25eee67535e87838f /scope.c
parentfdae947323b49384fccc4ae1603c2e5fca04f0f1 (diff)
downloadperl-f8fcc4c4d40dffe02ea3730dff8d5723dc1cf0fe.tar.gz
In S_save_scalar_at, remove oldtainted, unneeded since 0cbee0a449cc4e11.
0cbee0a449cc4e11 removed the call to mg_get(), and hence any possibility of calling code with the side effect of changing PL_tainted.
Diffstat (limited to 'scope.c')
-rw-r--r--scope.c2
1 files changed, 0 insertions, 2 deletions
diff --git a/scope.c b/scope.c
index 95fe5f7c66..0d07071e4b 100644
--- a/scope.c
+++ b/scope.c
@@ -183,10 +183,8 @@ S_save_scalar_at(pTHX_ SV **sptr, const U32 flags)
if (SvTYPE(osv) >= SVt_PVMG && SvMAGIC(osv) && SvTYPE(osv) != SVt_PVGV) {
if (SvGMAGICAL(osv)) {
- const bool oldtainted = PL_tainted;
SvFLAGS(osv) |= (SvFLAGS(osv) &
(SVp_IOK|SVp_NOK|SVp_POK)) >> PRIVSHIFT;
- PL_tainted = oldtainted;
}
if (!(flags & SAVEf_KEEPOLDELEM))
mg_localize(osv, sv, (flags & SAVEf_SETMAGIC) != 0);