summaryrefslogtreecommitdiffstats
path: root/tests/textDisp.test
diff options
context:
space:
mode:
Diffstat (limited to 'tests/textDisp.test')
-rw-r--r--tests/textDisp.test20
1 files changed, 10 insertions, 10 deletions
diff --git a/tests/textDisp.test b/tests/textDisp.test
index 133fcf5..80bdb9d 100644
--- a/tests/textDisp.test
+++ b/tests/textDisp.test
@@ -4175,9 +4175,9 @@ test textDisp-34.1 {Line heights recalculation problem: bug 2677890} -setup {
set ge [winfo geometry .]
scan $ge "%dx%d+%d+%d" width height left top
update
- .t1 yupdate
+ .t1 sync
set negative 0
- bind .t1 <<TextLineHeightsInvalid>> { if {%d < 0} {set negative 1} }
+ bind .t1 <<WidgetViewSync>> { if {%d < 0} {set negative 1} }
# Without the fix for bug 2677890, changing the width of the toplevel
# will launch recomputation of the line heights, but will produce negative
# number of still remaining outdated lines, which is obviously wrong.
@@ -4185,33 +4185,33 @@ test textDisp-34.1 {Line heights recalculation problem: bug 2677890} -setup {
# i.e. to check that the fix for this bug really is still in.
wm geometry . "[expr {$width * 2}]x$height+$left+$top"
update
- .t1 yupdate
+ .t1 sync
set negative
} -cleanup {
destroy .t1
} -result {0}
-test textDisp-34.2 {text yupdate syntax} -body {
+test textDisp-34.2 {text sync syntax} -body {
} -body {
pack [text .t1] -expand 1 -fill both
- .t1 yupdate foo
+ .t1 sync foo
} -cleanup {
destroy .t1
-} -returnCodes 1 -result {wrong # args: should be ".t1 yupdate ?-command command?"}
+} -returnCodes 1 -result {wrong # args: should be ".t1 sync ?-command command?"}
-test textDisp-34.3 {text yupdate syntax} -body {
+test textDisp-34.3 {text sync syntax} -body {
} -body {
pack [text .t1] -expand 1 -fill both
- .t1 yupdate -comx foo
+ .t1 sync -comx foo
} -cleanup {
destroy .t1
} -returnCodes 1 -result {wrong option "-comx": should be "-command"}
-test textDisp-34.4 {text yupdate syntax} -body {
+test textDisp-34.4 {text sync syntax} -body {
} -body {
set ::x 0
pack [text .t1] -expand 1 -fill both
- .t1 yupdate -comm [list set ::x 1]
+ .t1 sync -comm [list set ::x 1]
set ::x
} -cleanup {
destroy .t1