diff options
author | vincentdarley <vincentdarley> | 2005-05-13 13:47:18 (GMT) |
---|---|---|
committer | vincentdarley <vincentdarley> | 2005-05-13 13:47:18 (GMT) |
commit | 750404ce63573b22bc387ec615ee3c6c6d807a0b (patch) | |
tree | da206d2bf7356af7d4d310e4479178cb98f03f7b | |
parent | ca42fb6e8a854824ce4a721366545f93b4922b7c (diff) | |
download | tk-750404ce63573b22bc387ec615ee3c6c6d807a0b.zip tk-750404ce63573b22bc387ec615ee3c6c6d807a0b.tar.gz tk-750404ce63573b22bc387ec615ee3c6c6d807a0b.tar.bz2 |
fix to two text widget bugs
-rw-r--r-- | tests/textIndex.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/textIndex.test b/tests/textIndex.test index e88da10..0f8f4c0 100644 --- a/tests/textIndex.test +++ b/tests/textIndex.test @@ -6,7 +6,7 @@ # Copyright (c) 1998-1999 by Scriptics Corporation. # All rights reserved. # -# RCS: @(#) $Id: textIndex.test,v 1.16 2005/05/13 13:46:13 vincentdarley Exp $ +# RCS: @(#) $Id: textIndex.test,v 1.17 2005/05/13 13:47:18 vincentdarley Exp $ package require tcltest 2.1 eval tcltest::configure $argv @@ -886,7 +886,7 @@ test textIndex-22.13 {text index wordstart, unicode} { text_test_word wordstart "\uc700\uc700 abc" 8 } 3 -test textIndex-23.1 {text index wordstart, unicode} { +test textIndex-23.1 {text paragraph start} { pack [text .t2] .t2 insert end " Text" set res 2.0 |