diff options
| author | fvogel <fvogelnew1@free.fr> | 2015-11-21 09:08:52 (GMT) |
|---|---|---|
| committer | fvogel <fvogelnew1@free.fr> | 2015-11-21 09:08:52 (GMT) |
| commit | 6da3f989a4249675d97ecad8989d070f87966068 (patch) | |
| tree | 46787e083f3ee21082c17033447f1a4908071643 /tests/textDisp.test | |
| parent | 1238f724da65d098cb652af93972b4d0ac6e8f72 (diff) | |
| download | tk-6da3f989a4249675d97ecad8989d070f87966068.zip tk-6da3f989a4249675d97ecad8989d070f87966068.tar.gz tk-6da3f989a4249675d97ecad8989d070f87966068.tar.bz2 | |
Improved the tests a bit
Diffstat (limited to 'tests/textDisp.test')
| -rw-r--r-- | tests/textDisp.test | 26 |
1 files changed, 0 insertions, 26 deletions
diff --git a/tests/textDisp.test b/tests/textDisp.test index 80bdb9d..c8264e6 100644 --- a/tests/textDisp.test +++ b/tests/textDisp.test @@ -4191,32 +4191,6 @@ test textDisp-34.1 {Line heights recalculation problem: bug 2677890} -setup { destroy .t1 } -result {0} -test textDisp-34.2 {text sync syntax} -body { -} -body { - pack [text .t1] -expand 1 -fill both - .t1 sync foo -} -cleanup { - destroy .t1 -} -returnCodes 1 -result {wrong # args: should be ".t1 sync ?-command command?"} - -test textDisp-34.3 {text sync syntax} -body { -} -body { - pack [text .t1] -expand 1 -fill both - .t1 sync -comx foo -} -cleanup { - destroy .t1 -} -returnCodes 1 -result {wrong option "-comx": should be "-command"} - -test textDisp-34.4 {text sync syntax} -body { -} -body { - set ::x 0 - pack [text .t1] -expand 1 -fill both - .t1 sync -comm [list set ::x 1] - set ::x -} -cleanup { - destroy .t1 -} -result {1} - deleteWindows option clear |