diff options
| author | fvogel <fvogelnew1@free.fr> | 2016-12-02 06:35:22 (GMT) |
|---|---|---|
| committer | fvogel <fvogelnew1@free.fr> | 2016-12-02 06:35:22 (GMT) |
| commit | 954d42e47de744904aac4b8d78c7f7b4048e8a17 (patch) | |
| tree | 82c96e1c76308221038d51d0f1592d585be51bc0 | |
| parent | cabe11c363724790cf77f9a1c39b27703d0093b9 (diff) | |
| download | tk-954d42e47de744904aac4b8d78c7f7b4048e8a17.zip tk-954d42e47de744904aac4b8d78c7f7b4048e8a17.tar.gz tk-954d42e47de744904aac4b8d78c7f7b4048e8a17.tar.bz2 | |
Remove superfluous lines (the default font of the text widget is already saved in $curFont before the tests start).bug_3ee76e41c2
| -rw-r--r-- | tests/textTag.test | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/tests/textTag.test b/tests/textTag.test index ca34bc7..93feb27 100644 --- a/tests/textTag.test +++ b/tests/textTag.test @@ -1342,7 +1342,6 @@ test textTag-16.2 {TkTextPickCurrent procedure} -constraints { } -setup { .t tag delete {*}[.t tag names] event generate {} <Motion> -warp 1 -x -1 -y -1; update - set curFont [.t cget -font] .t configure -font $textWidgetFont -wrap none } -body { .t tag configure big -font $bigFont @@ -1417,7 +1416,6 @@ test textTag-16.5 {TkTextPickCurrent procedure} -constraints { .t tag remove $i 1.0 end } event generate {} <Motion> -warp 1 -x -1 -y -1; update - set curFont [.t cget -font] .t configure -font $textWidgetFont -wrap none } -body { .t tag configure big -font $bigFont @@ -1438,7 +1436,6 @@ test textTag-16.6 {TkTextPickCurrent procedure} -constraints { .t tag remove $i 1.0 end } event generate {} <Motion> -warp 1 -x -1 -y -1; update - set curFont [.t cget -font] .t configure -font $textWidgetFont -wrap none } -body { .t tag configure big -font $bigFont @@ -1460,7 +1457,6 @@ test textTag-16.7 {TkTextPickCurrent procedure} -constraints { .t tag remove $i 1.0 end } event generate {} <Motion> -warp 1 -x -1 -y -1; update - set curFont [.t cget -font] .t configure -font $textWidgetFont -wrap none } -body { .t tag configure big -font $bigFont |