diff options
author | fvogel <fvogelnew1@free.fr> | 2015-02-11 20:19:27 (GMT) |
---|---|---|
committer | fvogel <fvogelnew1@free.fr> | 2015-02-11 20:19:27 (GMT) |
commit | 7f41da748fce16f6accf68d1beed3e4a7e78ed71 (patch) | |
tree | dc0f0006ba93f8d27bdb50c9852738600fa930d3 /tests/textBTree.test | |
parent | 3cd90f7b661f3a7d1898acd66a7bc37a0e560dc0 (diff) | |
parent | 00e7ca4f6ce3fdc83f2e6ac826bbe608ca3ec707 (diff) | |
download | tk-7f41da748fce16f6accf68d1beed3e4a7e78ed71.zip tk-7f41da748fce16f6accf68d1beed3e4a7e78ed71.tar.gz tk-7f41da748fce16f6accf68d1beed3e4a7e78ed71.tar.bz2 |
Merged branch bug-382da038c9
Diffstat (limited to 'tests/textBTree.test')
-rw-r--r-- | tests/textBTree.test | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/tests/textBTree.test b/tests/textBTree.test index 3a89e55..1eb7c75 100644 --- a/tests/textBTree.test +++ b/tests/textBTree.test @@ -664,6 +664,16 @@ test btree-14.1 {check tag presence} { .t tag add x 141.3 .t tag names 141.1 } {x y z} +test btree-14.2 {TkTextIsElided} { + .t delete 1.0 end + .t tag config hidden -elide 1 + .t insert end "Line1\nLine2\nLine3\n" + .t tag add hidden 2.0 3.0 + .t tag add sel 1.2 3.2 + # next line used to panic because of "Bad tag priority being toggled on" + # (see bug [382da038c9]) + .t index "2.0 - 1 display line linestart" +} {1.0} test btree-15.1 {rebalance with empty node} { catch {destroy .t} |