diff options
| author | fvogelnew1@free.fr <fvogel> | 2014-11-23 14:09:09 (GMT) |
|---|---|---|
| committer | fvogelnew1@free.fr <fvogel> | 2014-11-23 14:09:09 (GMT) |
| commit | 7ee3cc3740cdb8d020c3d9a65fa270402274b5fb (patch) | |
| tree | 891682b5d50353e588f6f9ff7634013f3819f259 /tests | |
| parent | ce944811bf1229a14fa94dbe8a2e85a19bb24176 (diff) | |
| parent | 6aa9287c307b91afba9cbce1e1b8ce8fe44a6e0f (diff) | |
| download | tk-7ee3cc3740cdb8d020c3d9a65fa270402274b5fb.zip tk-7ee3cc3740cdb8d020c3d9a65fa270402274b5fb.tar.gz tk-7ee3cc3740cdb8d020c3d9a65fa270402274b5fb.tar.bz2 | |
Merged from branch bug-7703f947aa
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/textDisp.test | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/tests/textDisp.test b/tests/textDisp.test index 96670ac..4b5c8c1 100644 --- a/tests/textDisp.test +++ b/tests/textDisp.test @@ -1275,6 +1275,21 @@ test textDisp-9.12 {TkTextRedrawTag} { update list $tk_textRelayout $tk_textRedraw } {2.0 {2.0 eof}} +test textDisp-9.13 {TkTextRedrawTag} { + .t configure -wrap none + .t delete 1.0 end + for {set i 1} {$i < 10} {incr i} { + .t insert end "Line $i - This is Line [format %c [expr 64+$i]]\n" + } + .t tag add hidden 2.8 2.17 + .t tag add hidden 6.8 7.17 + .t tag configure hidden -background red + .t tag configure hidden -elide true + update + .t tag configure hidden -elide false + update + list $tk_textRelayout $tk_textRedraw +} {{2.0 6.0 7.0} {2.0 6.0 7.0}} test textDisp-10.1 {TkTextRelayoutWindow} { .t configure -wrap char |