diff options
author | Father Chrysostomos <sprout@cpan.org> | 2010-10-25 10:00:47 -0700 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2010-10-25 10:45:57 -0700 |
commit | 5cf4b255fd1d34956e94675ed15cb7a406e5b3e8 (patch) | |
tree | 7d63d3bb3202d7ef750268de26eab7ac99d9b0e5 /pp.c | |
parent | ea37b99e78f0d185369ee23611166669880576c6 (diff) | |
download | perl-5cf4b255fd1d34956e94675ed15cb7a406e5b3e8.tar.gz |
[perl #77498] Assignment ignores magick when the RHS holds a glob
Diffstat (limited to 'pp.c')
-rw-r--r-- | pp.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -221,7 +221,7 @@ PP(pp_rv2gv) save_gp(MUTABLE_GV(sv), !(PL_op->op_flags & OPf_SPECIAL)); if (sv && SvFAKE(sv)) { SV *newsv = sv_newmortal(); - sv_setsv(newsv, sv); + sv_setsv_flags(newsv, sv, 0); SvFAKE_off(newsv); SETs(newsv); } |