summaryrefslogtreecommitdiff
path: root/toke.c
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@gmail.com>2007-01-15 18:25:45 +0000
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2007-01-15 18:25:45 +0000
commit3e7dd34d07ec3fbcf1e108a3270d6009e068e8eb (patch)
tree221d72357a1188182ff576ec9f1933e27f280439 /toke.c
parent607905347eb1bbe08eb76ed3e8e9e27622ad97ed (diff)
downloadperl-3e7dd34d07ec3fbcf1e108a3270d6009e068e8eb.tar.gz
Enable the ~~ operator by default.
Remove the ~~ feature. p4raw-id: //depot/perl@29838
Diffstat (limited to 'toke.c')
-rw-r--r--toke.c3
1 files changed, 1 insertions, 2 deletions
diff --git a/toke.c b/toke.c
index c22d508038..ae4558bee2 100644
--- a/toke.c
+++ b/toke.c
@@ -4134,8 +4134,7 @@ Perl_yylex(pTHX)
/* FALL THROUGH */
case '~':
if (s[1] == '~'
- && (PL_expect == XOPERATOR || PL_expect == XTERMORDORDOR)
- && FEATURE_IS_ENABLED("~~"))
+ && (PL_expect == XOPERATOR || PL_expect == XTERMORDORDOR))
{
s += 2;
Eop(OP_SMARTMATCH);