diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2006-04-04 12:42:44 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2006-04-04 12:42:44 +0000 |
| commit | 7208511238c86c8b53478311bf19a0e8d7a979f9 (patch) | |
| tree | 0229027aefdb067776abca553b311a34ac29128a /perl_keyword.pl | |
| parent | 67698975b531393432f9df883ede410d0a406d7a (diff) | |
| download | perl-7208511238c86c8b53478311bf19a0e8d7a979f9.tar.gz | |
FEATURE_IS_ENABLED takes only one parameter now, so reflect that in
perl_keyword.pl
p4raw-id: //depot/perl@27713
Diffstat (limited to 'perl_keyword.pl')
| -rw-r--r-- | perl_keyword.pl | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/perl_keyword.pl b/perl_keyword.pl index 9312f47c54..5806728c30 100644 --- a/perl_keyword.pl +++ b/perl_keyword.pl @@ -86,10 +86,9 @@ if(ckWARN_d(WARN_SYNTAX)) END } elsif (my $feature = $feature_kw{$k}) { - my $feature_len = length($feature); $feature =~ s/([\\"])/\\$1/g; return <<END; -return (FEATURE_IS_ENABLED("$feature", $feature_len) ? ${sign}KEY_$k : 0); +return (FEATURE_IS_ENABLED("$feature") ? ${sign}KEY_$k : 0); END } return <<END; |