summaryrefslogtreecommitdiff
path: root/toke.c
diff options
context:
space:
mode:
authorStephen McCamant <smcc@mit.edu>1998-12-12 17:10:12 -0800
committerGurusamy Sarathy <gsar@cpan.org>1999-02-07 13:38:31 +0000
commita648f4b6e510a9583f3986716c22ee03c76d2271 (patch)
treee39a0eff4f53ff1abe2efdeffad0d7b135c28f15 /toke.c
parent14276096a0442ccd55a4c5652088e2e55b19dd09 (diff)
downloadperl-a648f4b6e510a9583f3986716c22ee03c76d2271.tar.gz
applied suggested patch; regen perly* and vms/perly*
Message-ID: <13939.26706.620683.846776@fre-76-120.reshall.berkeley.edu> Subject: [PATCH] Re: Suggestion for perlobj man page p4raw-id: //depot/perl@2823
Diffstat (limited to 'toke.c')
-rw-r--r--toke.c2
1 files changed, 0 insertions, 2 deletions
diff --git a/toke.c b/toke.c
index f697741714..22344b491b 100644
--- a/toke.c
+++ b/toke.c
@@ -598,8 +598,6 @@ force_word(register char *start, int token, int check_keyword, int allow_pack, i
PL_expect = XTERM;
else {
PL_expect = XOPERATOR;
- force_next(')');
- force_next('(');
}
}
PL_nextval[PL_nexttoke].opval = (OP*)newSVOP(OP_CONST,0, newSVpv(PL_tokenbuf,0));