diff options
| author | fvogel <fvogelnew1@free.fr> | 2021-03-22 08:24:00 (GMT) |
|---|---|---|
| committer | fvogel <fvogelnew1@free.fr> | 2021-03-22 08:24:00 (GMT) |
| commit | 70e646fa5e76a56a60ca07b3b95a0eaad45983a7 (patch) | |
| tree | ae1ee9e40712a8bb42e3b53e5cdbd519bd832c46 /tests/event.test | |
| parent | b4a63e993061e493c20387f5ee294ad9482f3cc3 (diff) | |
| parent | 911e6945bdebb097f23426a01310bbd85891167a (diff) | |
| download | tk-70e646fa5e76a56a60ca07b3b95a0eaad45983a7.zip tk-70e646fa5e76a56a60ca07b3b95a0eaad45983a7.tar.gz tk-70e646fa5e76a56a60ca07b3b95a0eaad45983a7.tar.bz2 | |
merge core-8-6-branch (and resolve conflicts in event-9 and textTag-16.2)
Diffstat (limited to 'tests/event.test')
| -rw-r--r-- | tests/event.test | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/tests/event.test b/tests/event.test index 4b485c1..951a6f6 100644 --- a/tests/event.test +++ b/tests/event.test @@ -828,9 +828,13 @@ test event-9 {no <Enter> event is generated for the container window when its pack propagate .top 0 bind .top <Enter> {lappend res %W} pack [frame .top.f -bg green -width 50 -height 50] -anchor se -side bottom + # stabilize the test by giving some time to the OS before the upcoming update, + # so that -warp below finds the frame + after 50 update event generate .top.f <Motion> -warp 1 -x 25 -y 25 ; # <Enter> sent to .top and .top.f - after 50 ; update + after 50 ; # Win specific - wait for SendInput to be executed + update ; # idletasks not enough destroy .top.f ; # no <Enter> event sent update set res |