X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=perly.y;h=a1a1f0da7501beea4598c0d829f752c9095f2a24;hb=c73bb82c00a639630ef310b1ac1d896f5afcedab;hp=7eda39e82fcc41afd8036bdaa6cb8ff9233e4418;hpb=ecca16b0cfe0c7f04ba520f2924946a13507530e;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/perly.y b/perly.y
index 7eda39e..a1a1f0d 100644
--- a/perly.y
+++ b/perly.y
@@ -442,8 +442,7 @@ term	:	term ASSIGNOP term
 	|	scalar	%prec '('
 			{ $$ = $1; }
 	|	star '{' expr ';' '}'
-			{ $$ = newBINOP(OP_GELEM, 0, newGVREF(0,$1),
-					scalar($3)); }
+			{ $$ = newBINOP(OP_GELEM, 0, $1, scalar($3)); }
 	|	star	%prec '('
 			{ $$ = $1; }
 	|	scalar '[' expr ']'	%prec '('