diff options
| author | fvogelnew1@free.fr <fvogel> | 2014-11-22 22:14:37 (GMT) |
|---|---|---|
| committer | fvogelnew1@free.fr <fvogel> | 2014-11-22 22:14:37 (GMT) |
| commit | 5622423104421a6dcda92700f47239a29fe6fd3a (patch) | |
| tree | 9710af3fe7b9b80f8b20f3d88e5030e56aa25b23 /tests/textDisp.test | |
| parent | fa54982f4983bd67d4446a5a6f17e91a36e7fe61 (diff) | |
| download | tk-5622423104421a6dcda92700f47239a29fe6fd3a.zip tk-5622423104421a6dcda92700f47239a29fe6fd3a.tar.gz tk-5622423104421a6dcda92700f47239a29fe6fd3a.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/textDisp.test')
| -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 |