summaryrefslogtreecommitdiff
path: root/mg.c
diff options
context:
space:
mode:
authorJohn Peacock <jpeacock@rowman.com>2001-05-24 18:14:01 -0400
committerJarkko Hietaniemi <jhi@iki.fi>2001-05-26 13:14:30 +0000
commit06759ea031c43fa8236d70242f3d2f6e2fddd408 (patch)
tree8564b86ecba4d3f191fbbcb6290b1edb332e3573 /mg.c
parentaf6c647ee5aae2406b2bfb66c4fe11a81de75b05 (diff)
downloadperl-06759ea031c43fa8236d70242f3d2f6e2fddd408.tar.gz
Re: [ID 20010426.005] Magic not being removed at scope exit [PATCH]
Message-ID: <3B0DBFE9.A7C49084@rowman.com> p4raw-id: //depot/perl@10214
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 0c865bc33f..59233f71ce 100644
--- a/mg.c
+++ b/mg.c
@@ -51,7 +51,7 @@ S_save_magic(pTHX_ I32 mgs_ix, SV *sv)
SvMAGICAL_off(sv);
SvREADONLY_off(sv);
- SvFLAGS(sv) |= (SvFLAGS(sv) & (SVp_IOK|SVp_NOK|SVp_POK)) >> PRIVSHIFT;
+ SvFLAGS(sv) |= (SvFLAGS(sv) & (SVp_NOK|SVp_POK)) >> PRIVSHIFT;
}
/*