summaryrefslogtreecommitdiff
path: root/op.c
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2015-08-19 13:10:16 -0700
committerRicardo Signes <rjbs@cpan.org>2015-09-29 10:49:19 -0400
commit7fba29668402ec06ad00dfafda69913bcbb2c1df (patch)
tree70b3e0d3f06e47f23571ce6f95c09991ee83b39b /op.c
parent96f902ff649ca0f75966f5282611d16ecf5f907e (diff)
downloadperl-7fba29668402ec06ad00dfafda69913bcbb2c1df.tar.gz
Disable lexical $_
This just disables the syntax and modifes the tests. The underlying infrastructure has not been removed yet. I had to change a couple of tests in cpan/.
Diffstat (limited to 'op.c')
-rw-r--r--op.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/op.c b/op.c
index 745cb5ff68..5d396b8a18 100644
--- a/op.c
+++ b/op.c
@@ -594,7 +594,7 @@ Perl_allocmy(pTHX_ const char *const name, const STRLEN len, const U32 flags)
!(is_our ||
isALPHA(name[1]) ||
((flags & SVf_UTF8) && isIDFIRST_utf8((U8 *)name+1)) ||
- (name[1] == '_' && (*name == '$' || len > 2))))
+ (name[1] == '_' && len > 2)))
{
if (!(flags & SVf_UTF8 && UTF8_IS_START(name[1]))
&& isASCII(name[1])