summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorShawn O. Pearce <spearce@spearce.org>2008-02-14 06:05:04 (GMT)
committerShawn O. Pearce <spearce@spearce.org>2008-02-14 06:05:04 (GMT)
commit765239e9d26561454f125cb3033ff55db5d78ce4 (patch)
tree2cda99a80c863a63a946aa881c422c6a0e080ffd /lib
parent95b002eeb38de89feb7f0cc1a55721b45fd3cf11 (diff)
downloadgit-765239e9d26561454f125cb3033ff55db5d78ce4.zip
git-765239e9d26561454f125cb3033ff55db5d78ce4.tar.gz
git-765239e9d26561454f125cb3033ff55db5d78ce4.tar.bz2
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>
Diffstat (limited to 'lib')
-rw-r--r--lib/spellcheck.tcl2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/spellcheck.tcl b/lib/spellcheck.tcl
index 01c2c4f..7f018e4 100644
--- a/lib/spellcheck.tcl
+++ b/lib/spellcheck.tcl
@@ -308,7 +308,7 @@ method _read {} {
# try to round out the word.
#
while {$curr ne $orig
- && [string equal -length [llength $curr] $curr $orig]} {
+ && [string equal -length [string length $curr] $curr $orig]} {
set n_loc [$w_text index "$e_loc +1c"]
set n_curr [$w_text get $b_loc $n_loc]
if {$n_curr eq $curr} {