diff options
author | Father Chrysostomos <sprout@cpan.org> | 2017-09-24 16:48:48 -0700 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2017-10-08 13:06:06 -0700 |
commit | a35c901808a982f357645ef262e94f60300ddd23 (patch) | |
tree | 812315179ad8c55c0513a7209009e0376b8f1ba2 /pp_hot.c | |
parent | 6881372e19f63014452bb62329f9954deb042b2e (diff) | |
download | perl-a35c901808a982f357645ef262e94f60300ddd23.tar.gz |
Make pp_multideref handle local $::{subref}
Based on a patch by Nicholas R.
Diffstat (limited to 'pp_hot.c')
-rw-r--r-- | pp_hot.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -2997,7 +2997,7 @@ PP(pp_multideref) } else { if (localizing) { - if (HvNAME_get(hv) && isGV(sv)) + if (HvNAME_get(hv) && isGV_or_RVCV(sv)) save_gp(MUTABLE_GV(sv), !(PL_op->op_flags & OPf_SPECIAL)); else if (preeminent) { |