summaryrefslogtreecommitdiff
path: root/op.c
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2011-12-18 10:43:51 -0800
committerFather Chrysostomos <sprout@cpan.org>2011-12-18 11:15:01 -0800
commit41b1a11c41a16644781f2d33a9ed57d15fee0aec (patch)
tree8c0acbea81cbe06fafd8ceff092835a3ac3c8a27 /op.c
parent544303ee2c02a7b1a482fbe23470d24904ac1f0e (diff)
downloadperl-41b1a11c41a16644781f2d33a9ed57d15fee0aec.tar.gz
Revert "Make scalar() propagate lvalueness"
This reverts commit d408447cb636e46fcb4f7fe7d0909bb351b7ba22.
Diffstat (limited to 'op.c')
-rw-r--r--op.c1
1 files changed, 0 insertions, 1 deletions
diff --git a/op.c b/op.c
index 08e9790b80..146c3683e3 100644
--- a/op.c
+++ b/op.c
@@ -2001,7 +2001,6 @@ Perl_op_lvalue_flags(pTHX_ OP *o, I32 type, U32 flags)
else if (!(o->op_flags & OPf_KIDS))
break;
if (o->op_targ != OP_LIST) {
- case OP_SCALAR:
op_lvalue(cBINOPo->op_first, type);
break;
}