summaryrefslogtreecommitdiff
path: root/pp.c
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2012-08-25 22:27:33 -0700
committerFather Chrysostomos <sprout@cpan.org>2012-08-25 23:02:07 -0700
commitadc42c31aa41517bfdda512fee0bbc3859910f76 (patch)
treea50f51af6d69e149eeed375b731dfcb924e4855e /pp.c
parentc8fe3bdf72b0df1c0b68f180001f0a3dde206992 (diff)
downloadperl-adc42c31aa41517bfdda512fee0bbc3859910f76.tar.gz
Correct typo in flag name
Diffstat (limited to 'pp.c')
-rw-r--r--pp.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/pp.c b/pp.c
index 0d31c2634a..0c148baf2b 100644
--- a/pp.c
+++ b/pp.c
@@ -132,7 +132,7 @@ PP(pp_padhv)
RETURNOP(Perl_do_kv(aTHX));
}
else if ((PL_op->op_private & OPpTRUEBOOL
- || ( PL_op->op_private & OpMAYBE_TRUEBOOL
+ || ( PL_op->op_private & OPpMAYBE_TRUEBOOL
&& block_gimme() == G_VOID ))
&& (!SvRMAGICAL(TARG) || !mg_find(TARG, PERL_MAGIC_tied)))
SETs(HvUSEDKEYS(TARG) ? &PL_sv_yes : sv_2mortal(newSViv(0)));