for my ($foo,,, $bar) { ... } should parse as ($foo, $bar)

Multiple commas between the lexicals in the list shouldn't change the
parsing.

1 files changed, 2 insertions, 2 deletions

diff --git a/perly.act b/perly.act
index 280c1471ba..d70df44cdc 100644
--- a/perly.act
+++ b/perly.act
@@ -2070,7 +2070,7 @@ case 2:
 
   case 276:
 #line 1387 "perly.y"
-                        { parser->in_my = 0; (yyval.opval) = (ps[-1].val.opval); }
+                        { (yyval.opval) = (ps[-1].val.opval); }
 
     break;
 
@@ -2183,6 +2183,6 @@ case 2:
     
 
 /* Generated from:
- * e87297a1b718c1eb135698aef6d0fe1da0c008db89e13c13a2f746afc9dba3e3 perly.y
+ * 15f94e78bed944fe5a2da8ead4096a620ad573562953c479348c65e9eaa51629 perly.y
  * acf1cbfd2545faeaaa58b1cf0cf9d7f98b5be0752eb7a54528ef904a9e2e1ca7 regen_perly.pl
  * ex: set ro: */