summaryrefslogtreecommitdiff
path: root/mg.c
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2006-02-14 23:42:45 +0000
committerNicholas Clark <nick@ccl4.org>2006-02-14 23:42:45 +0000
commitc268c2a6c105d04cb2a165c1cfb63069e7ae2774 (patch)
treeb81e445193b945d25e66e5b7b457bad745938c67 /mg.c
parent9b15102ac1516dec5ebb563b92cc3e6800cfa1d2 (diff)
downloadperl-c268c2a6c105d04cb2a165c1cfb63069e7ae2774.tar.gz
Back out change change 10214 (drop SVp_IOK from >> PRIVSHIFT) as it
never felt quite correct, and other parts of the SV conversion implementation have improved such that the symptoms 10214 covered over are gone even without it. p4raw-id: //depot/perl@27184
Diffstat (limited to 'mg.c')
-rw-r--r--mg.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/mg.c b/mg.c
index 339a6d43d4..20344ad0cb 100644
--- a/mg.c
+++ b/mg.c
@@ -100,7 +100,7 @@ S_save_magic(pTHX_ I32 mgs_ix, SV *sv)
SvMAGICAL_off(sv);
SvREADONLY_off(sv);
- SvFLAGS(sv) |= (SvFLAGS(sv) & (SVp_NOK|SVp_POK)) >> PRIVSHIFT;
+ SvFLAGS(sv) |= (SvFLAGS(sv) & (SVp_IOK|SVp_NOK|SVp_POK)) >> PRIVSHIFT;
}
/*