Raphael Geissert <[email protected]> writes:
> Russ Allbery wrote:

>> diff --git a/lib/Spelling.pm b/lib/Spelling.pm
>> index 389ceef..62692fa 100644
>> --- a/lib/Spelling.pm
>> +++ b/lib/Spelling.pm
> [...]
>> +            my $correction = $CORRECTIONS{$lcword};
>> +            if ($word =~ /^[A-Z]/) {
>> +                $correction = ucfirst $correction;
>> +            }

> As this is still wrong for uppercase words I'm not sure it's even worth
> trying to be smart by uppercasing the first character.

Well, for the most part we don't get all-uppercase words, but
capitalization of the first character is fairly common.  I thought this
might give slightly more accurate results, since I admit even I have been
thrown by an all-lowercase word that turned out to be capitalized at the
beginning of a sentence.

> P.S. uppercasing every single word is a huge performance penalty, but
> well... there's not much we can do about that.

Yeah, I fliched a little putting it in, but I don't see another good way
to avoid the acronym problem.

-- 
Russ Allbery ([email protected])               <http://www.eyrie.org/~eagle/>


-- 
To UNSUBSCRIBE, email to [email protected]
with a subject of "unsubscribe". Trouble? Contact [email protected]

Reply via email to