diff options
| author | fvogel <fvogelnew1@free.fr> | 2014-11-22 22:14:37 (GMT) |
|---|---|---|
| committer | fvogel <fvogelnew1@free.fr> | 2014-11-22 22:14:37 (GMT) |
| commit | 23593a9973dc8bf774d08f95ad32a8df1a086feb (patch) | |
| tree | 9710af3fe7b9b80f8b20f3d88e5030e56aa25b23 /tests | |
| parent | b70e521d38e50970939b454a348f2394890d2d01 (diff) | |
| download | tk-23593a9973dc8bf774d08f95ad32a8df1a086feb.zip tk-23593a9973dc8bf774d08f95ad32a8df1a086feb.tar.gz tk-23593a9973dc8bf774d08f95ad32a8df1a086feb.tar.bz2 | |
Fixed textDisp-9.3 to -9.6 - The expected test results were not relevant without the update between tag add and tag remove
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/textDisp.test | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/tests/textDisp.test b/tests/textDisp.test index 70c7208..ef65956 100644 --- a/tests/textDisp.test +++ b/tests/textDisp.test @@ -1173,40 +1173,44 @@ test textDisp-9.3 {TkTextRedrawTag} { .t insert 1.0 "Line 1\nLine 2 is long enough to wrap around\nLine 3\nLine 4" update .t tag add big 2.2 2.4 + update .t tag remove big 1.0 end update list $tk_textRelayout $tk_textRedraw -} {2.0 2.0} +} {{2.0 2.20} {2.0 2.20 eof}} test textDisp-9.4 {TkTextRedrawTag} { .t configure -wrap char .t delete 1.0 end .t insert 1.0 "Line 1\nLine 2 is long enough to wrap around\nLine 3\nLine 4" update .t tag add big 2.2 2.20 + update .t tag remove big 1.0 end update list $tk_textRelayout $tk_textRedraw -} {2.0 2.0} +} {{2.0 2.20} {2.0 2.20 eof}} test textDisp-9.5 {TkTextRedrawTag} { .t configure -wrap char .t delete 1.0 end .t insert 1.0 "Line 1\nLine 2 is long enough to wrap around\nLine 3\nLine 4" update .t tag add big 2.2 2.end + update .t tag remove big 1.0 end update list $tk_textRelayout $tk_textRedraw -} {{2.0 2.20} {2.0 2.20}} +} {{2.0 2.20} {2.0 2.20 eof}} test textDisp-9.6 {TkTextRedrawTag} { .t configure -wrap char .t delete 1.0 end .t insert 1.0 "Line 1\nLine 2 is long enough to wrap\nLine 3 is also long enough to wrap\nLine 4" update .t tag add big 2.2 3.5 + update .t tag remove big 1.0 end update list $tk_textRelayout $tk_textRedraw -} {{2.0 2.20 3.0} {2.0 2.20 3.0}} +} {{2.0 2.20 3.0 3.20} {2.0 2.20 3.0 3.20 4.0 eof}} test textDisp-9.7 {TkTextRedrawTag} { .t configure -wrap char .t delete 1.0 end |