diff options
author | Steve Peters <steve@fisharerojo.org> | 2005-10-29 14:33:30 +0000 |
---|---|---|
committer | Steve Peters <steve@fisharerojo.org> | 2005-10-29 14:33:30 +0000 |
commit | e424a81e12752daec8332495577eb8122f350b31 (patch) | |
tree | 53bbd3b6b9dd9279a2216f4d5d3aaafd211e1909 /mg.c | |
parent | aae9cea0a2be05abb857e6b2b32773d3d5fae6d8 (diff) | |
download | perl-e424a81e12752daec8332495577eb8122f350b31.tar.gz |
Oops, missed an sv_force_normal()
p4raw-id: //depot/perl@25877
Diffstat (limited to 'mg.c')
-rw-r--r-- | mg.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -2797,7 +2797,7 @@ S_restore_magic(pTHX_ const void *p) /* While magic was saved (and off) sv_setsv may well have seen this SV as a prime candidate for COW. */ if (SvIsCOW(sv)) - sv_force_normal(sv); + sv_force_normal_flags(sv, 0); #endif if (mgs->mgs_flags) |