diff options
| author | Ben Morrow <ben@morrow.me.uk> | 2008-06-28 18:00:17 +0100 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2008-06-28 21:06:57 +0000 |
| commit | 6e592b3a92f7ee35c9a857bd9a43297ab1693599 (patch) | |
| tree | 262d198509e9c5efd2b2af3fcebb6daa6456c827 /pp_ctl.c | |
| parent | 087986a76c08e8dfaaee54f8f476bfa315216671 (diff) | |
| download | perl-6e592b3a92f7ee35c9a857bd9a43297ab1693599.tar.gz | |
Some more missing isGV_with_GP()s
Message-ID: <20080628160017.GA81579@osiris.mauzo.dyndns.org>
p4raw-id: //depot/perl@34092
Diffstat (limited to 'pp_ctl.c')
| -rw-r--r-- | pp_ctl.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -3353,11 +3353,11 @@ PP(pp_require) } } - if (SvROK(arg) && SvTYPE(SvRV(arg)) == SVt_PVGV) { + if (SvROK(arg) && isGV_with_GP(SvRV(arg))) { arg = SvRV(arg); } - if (SvTYPE(arg) == SVt_PVGV) { + if (isGV_with_GP(arg)) { IO * const io = GvIO((GV *)arg); ++filter_has_file; |