From 850e851687c46990a59eb0bed2e5e3dc49703472 Mon Sep 17 00:00:00 2001
From: Rafael Garcia-Suarez <rgarciasuarez@gmail.com>
Date: Tue, 27 Sep 2005 10:09:46 +0000
Subject: Fix the overriding of CORE::do, just like change 25599 was fixing the
 overriding of CORE::require

p4raw-id: //depot/perl@25616
---
 perly.act | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perly.act')

diff --git a/perly.act b/perly.act
index 05269e28e5..243dfcb1b3 100644
--- a/perly.act
+++ b/perly.act
@@ -707,7 +707,7 @@ case 2:
 
   case 133:
 #line 569 "perly.y"
-    { (yyval.opval) = dofile((yyvsp[0].opval)); ;}
+    { (yyval.opval) = dofile((yyvsp[0].opval), (yyvsp[-1].ival)); ;}
     break;
 
   case 134:
-- 
cgit v1.2.1