Hi,
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.
P.S. uppercasing every single word is a huge performance penalty, but
well... there's not much we can do about that.
Cheers,
--
Raphael Geissert - Debian Developer
www.debian.org - get.debian.net
--
To UNSUBSCRIBE, email to [email protected]
with a subject of "unsubscribe". Trouble? Contact [email protected]