From c268c2a6c105d04cb2a165c1cfb63069e7ae2774 Mon Sep 17 00:00:00 2001
From: Nicholas Clark <nick@ccl4.org>
Date: Tue, 14 Feb 2006 23:42:45 +0000
Subject: 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
---
 mg.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'mg.c')

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;
 }
 
 /*
-- 
cgit v1.2.1