diff options
| author | Father Chrysostomos <sprout@cpan.org> | 2014-09-15 14:50:00 -0700 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2014-09-15 16:47:50 -0700 |
| commit | 0c028dca83ca08aba6b78a65e979163e4a779bf8 (patch) | |
| tree | 9637a812acd063d0425c0320a77bde018b832001 /gv.c | |
| parent | 2fbadc08f550cedfc8690b365310c2f6d81e960d (diff) | |
| download | perl-0c028dca83ca08aba6b78a65e979163e4a779bf8.tar.gz | |
Avoid reifying GV when lex stub is used as method
Diffstat (limited to 'gv.c')
| -rw-r--r-- | gv.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1101,7 +1101,7 @@ Perl_gv_fetchmethod_pvn_flags(pTHX_ HV *stash, const char *name, const STRLEN le GV* stubgv; GV* autogv; - if (CvANON(cv) || !CvGV(cv)) + if (CvANON(cv) || CvLEXICAL(cv)) stubgv = gv; else { stubgv = CvGV(cv); |