make C<use> recognize C<require> overrides; allow C<do EXPR> to be

overridden

p4raw-id: //depot/perl@1923

1 files changed, 1 insertions, 1 deletions

diff --git a/perly.c b/perly.c
index f9799a89ac..eccfdd7ed5 100644
--- a/perly.c
+++ b/perly.c
@@ -2110,7 +2110,7 @@ case 134:
 break;
 case 135:
 #line 515 "perly.y"
-{ yyval.opval = newUNOP(OP_DOFILE, 0, scalar(yyvsp[0].opval)); }
+{ yyval.opval = dofile(yyvsp[0].opval); }
 break;
 case 136:
 #line 517 "perly.y"