diff options
| author | fvogel <fvogel@noemail.net> | 2015-04-08 19:05:28 (GMT) |
|---|---|---|
| committer | fvogel <fvogel@noemail.net> | 2015-04-08 19:05:28 (GMT) |
| commit | 99cd0c6958b9bcd883b97dc6fdfa5a15edaab75a (patch) | |
| tree | e69ccf2545612bbf8159024fb30fdaff07107147 /tests/textIndex.test | |
| parent | 509d9341eb4a7ae3f9010a2a7f49828cd1e6b6f0 (diff) | |
| download | tk-99cd0c6958b9bcd883b97dc6fdfa5a15edaab75a.zip tk-99cd0c6958b9bcd883b97dc6fdfa5a15edaab75a.tar.gz tk-99cd0c6958b9bcd883b97dc6fdfa5a15edaab75a.tar.bz2 | |
Added test for bug [562118ce41]
FossilOrigin-Name: 29a622f40bf3f8eca5920512cd417a61abb6545d
Diffstat (limited to 'tests/textIndex.test')
| -rw-r--r-- | tests/textIndex.test | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/tests/textIndex.test b/tests/textIndex.test index 28dc0df..b9cc74d 100644 --- a/tests/textIndex.test +++ b/tests/textIndex.test @@ -905,6 +905,16 @@ test textIndex-22.12 {text index wordstart, unicode} { test textIndex-22.13 {text index wordstart, unicode} { text_test_word wordstart "\uc700\uc700 abc" 8 } 3 +test textIndex-22.14 {text index wordstart, unicode, start index at internal segment start} { + catch {destroy .t} + text .t + .t insert end "C'est du texte en fran\u00e7ais\n" + .t insert end "\u042D\u0442\u043E\u0020\u0442\u0435\u043A\u0441\u0442\u0020\u043D\u0430\u0020\u0440\u0443\u0441\u0441\u043A\u043E\u043C" + .t mark set insert 1.23 + set res [.t index "1.23 wordstart"] + .t mark set insert 2.16 + lappend res [.t index "2.16 wordstart"] [.t index "2.15 wordstart"] +} {1.18 2.13 2.13} test textIndex-23.1 {text paragraph start} { pack [text .t2] |