git-gui: Paper bag fix bad string length call in spellchecker
We don't want the list length, we need the string length. Found due to a bad " character discovered in the text and Tcl throwing 'unmatched open quote in list'. Signed-off-by: Shawn O. Pearce <spearce@spearce.org>
Shawn O. Pearce committed
Feb 14, 2008 at 01:05 UTC
765239e9d26561454f125cb3033ff55db5d78ce4
1 file changed
+1
-1
lib/spellcheck.tcl
+1
-1
@@ -308,7 +308,7 @@ method _read {} {
308
# try to round out the word.
309
#
310
while {$curr ne $orig
311
- && [string equal -length [llength $curr] $curr $orig]} {
311
+ && [string equal -length [string length $curr] $curr $orig]} {
312
set n_loc [$w_text index "$e_loc +1c"]
313
set n_curr [$w_text get $b_loc $n_loc]
314
if {$n_curr eq $curr} {