From 47f9f84cc98b8a5779f47ca8a12283098d2816e4 Mon Sep 17 00:00:00 2001 From: "Jerry D. Hedden" Date: Mon, 30 Apr 2007 13:06:28 -0400 Subject: Remove ext/Thread From: "Jerry D. Hedden" Message-ID: <1ff86f510704301406t6373912ame78fea5c7a148cf4@mail.gmail.com> p4raw-id: //depot/perl@31114 --- toke.c | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'toke.c') diff --git a/toke.c b/toke.c index 7181fee56e..c2a5566ca6 100644 --- a/toke.c +++ b/toke.c @@ -5200,8 +5200,7 @@ Perl_yylex(pTHX) } else if (gv && !gvp && -tmp==KEY_lock /* XXX generalizable kludge */ - && GvCVu(gv) - && !hv_fetchs(GvHVn(PL_incgv), "Thread.pm", FALSE)) + && GvCVu(gv)) { tmp = 0; /* any sub overrides "weak" keyword */ } -- cgit v1.2.1