index a479b2f2857751d4d573c7bfe00f9e671d437aed..e6120303e940ee6c849bf706415c1b450e68b57f 100644 (file)
method _read {} {
while {[gets $s_fd line] >= 0} {
set lineno [lindex $s_pending 0 0]
+ set line [string trim $line]
if {$s_clear} {
$w_text tag remove misspelled "$lineno.0" "$lineno.end"