diff options
Diffstat (limited to 'tests/bind.test')
| -rw-r--r-- | tests/bind.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/bind.test b/tests/bind.test index 7d5cea5..d17ff37 100644 --- a/tests/bind.test +++ b/tests/bind.test @@ -6690,7 +6690,7 @@ test bind-34.3 {-warp works with null or negative coordinates} -setup { } -result {0 0 ok ok} test bind-35.1 {pointer warp with grab on master, bug [e3888d5820]} -setup { - event generate {} <Motion> -warp 1 -x 1 -y 1 + event generate {} <Motion> -warp 1 -x 50 -y 50 update idletasks ; # DoWarp is an idle callback after 50 ; # Win specific - wait for SendInput to be executed toplevel .top @@ -6708,7 +6708,7 @@ test bind-35.1 {pointer warp with grab on master, bug [e3888d5820]} -setup { event generate .top.l <Motion> -warp 1 -x 10 -y 10 update idletasks ; after 50 foreach {x1 y1} [winfo pointerxy .top.l] {} - event generate {} <Motion> -warp 1 -x 1 -y 1 + event generate {} <Motion> -warp 1 -x 50 -y 50 update idletasks ; after 50 grab release .top ; # this will queue events after 50 |