Add space between misspelled word and suggested fixes.
Patch by denise.
diffs (26 lines):
diff -r 3ed8be398cda -r f28123226658 cgi-bin/LJ/SpellCheck.pm
--- a/cgi-bin/LJ/SpellCheck.pm Wed Jul 01 15:18:13 2009 +0000
+++ b/cgi-bin/LJ/SpellCheck.pm Wed Jul 01 15:27:55 2009 +0000
@@ -97,10 +97,10 @@ sub check_html {
$ofs -= 1; # because ispell reports "1" for first character
$output .= LJ::ehtml(substr($inline, $srcidx, $ofs-$srcidx));
- $output .= "<font
color=\"$self->{'color'}\">".LJ::ehtml($word)."</font>";
+ $output .= "<font color=\"$self->{'color'}\">" .
LJ::ehtml($word)."</font>";
- $footnotes .= "<tr valign=top><td align=right><font
color=$self->{'color'}>".LJ::ehtml($word).
-
"</font></td><td>".LJ::ehtml($idata)."</td></tr>";
+ $footnotes .= "<tr valign=top><td align=right><font
color=$self->{'color'}>" . LJ::ehtml($word).
+
" </font></td><td>".LJ::ehtml($idata)."</td></tr>";
$srcidx = $ofs + length($word);
} elsif ($idata =~ /^\# /) {
@@ -109,7 +109,7 @@ sub check_html {
my ($word, $ofs) = ($1, $2);
$ofs -= 1; # because ispell reports "1" for first character
$output .= LJ::ehtml(substr($inline, $srcidx, $ofs-$srcidx));
- $output .= "<font
color=\"$self->{'color'}\">".LJ::ehtml($word)."</font>";
+ $output .= " <font
color=\"$self->{'color'}\">".LJ::ehtml($word)."</font> ";
$srcidx = $ofs + length($word);
}
} while ($idata ne "");
_______________________________________________
dw-changelog mailing list
[email protected]
http://lists.dwscoalition.org/mailman/listinfo/dw-changelog