summaryrefslogtreecommitdiffstats
path: root/tests/textDisp.test
diff options
context:
space:
mode:
Diffstat (limited to 'tests/textDisp.test')
-rw-r--r--tests/textDisp.test18
1 files changed, 18 insertions, 0 deletions
diff --git a/tests/textDisp.test b/tests/textDisp.test
index 4c88b38..f2b176c 100644
--- a/tests/textDisp.test
+++ b/tests/textDisp.test
@@ -4191,6 +4191,24 @@ test textDisp-34.1 {Line heights recalculation problem: bug 2677890} -setup {
destroy .t1
} -result {0}
+test textDisp-34.2 {text yupdate syntax} -body {
+} -body {
+ pack [text .t1] -expand 1 -fill both
+ .t1 yupdate foo
+} -cleanup {
+ destroy .t1
+} -returnCodes 1 -result {wrong # args: should be ".t1 yupdate ?-command command?"}
+
+test textDisp-34.3 {text yupdate syntax} -body {
+} -body {
+ set ::x 0
+ pack [text .t1] -expand 1 -fill both
+ .t1 yupdate -command [list set ::x 1]
+ set ::x
+} -cleanup {
+ destroy .t1
+} -result {1}
+
deleteWindows
option clear