From e334a159a5616cab575044bafaf68f75b7bb3a16 Mon Sep 17 00:00:00 2001
From: Larry Wall <lwall@netlabs.com>
Date: Thu, 4 Feb 1993 22:50:33 +0000
Subject: perl 4.0 patch 36:  (combined patch)

Since Ed Barton sent me a patch for the malignent form of "Malformed
cmd links", I finally broke down and made a patch for the various
other little things that have been accumulating on version 4.
---
 perly.y | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perly.y')

diff --git a/perly.y b/perly.y
index a52f18aff0..0a1c2c9684 100644
--- a/perly.y
+++ b/perly.y
@@ -544,7 +544,7 @@ term	:	'-' term %prec UMINUS
 	|	DELETE '(' REG '{' expr ';' '}' ')'	%prec '('
 			{ $$ = make_op(O_DELETE, 2,
 				stab2arg(A_STAB,hadd($3)),
-				jmaybe($4),
+				jmaybe($5),
 				Nullarg);
 			    expectterm = FALSE; }
 	|	ARYLEN	%prec '('
-- 
cgit v1.2.1