diff options
author | fvogel <fvogelnew1@free.fr> | 2016-05-30 20:16:28 (GMT) |
---|---|---|
committer | fvogel <fvogelnew1@free.fr> | 2016-05-30 20:16:28 (GMT) |
commit | f77be3e4cd37f2986f8c5960d7b61d2f800ba6b4 (patch) | |
tree | 9ded4a23ef169a9a4597b60f8aea9acb87cf60db | |
parent | 3c97457911a615a201c7105b290b206ac22e9d2f (diff) | |
download | tk-f77be3e4cd37f2986f8c5960d7b61d2f800ba6b4.zip tk-f77be3e4cd37f2986f8c5960d7b61d2f800ba6b4.tar.gz tk-f77be3e4cd37f2986f8c5960d7b61d2f800ba6b4.tar.bz2 |
A mouse button once pressed should be released. Doing otherwise messes up with assumptions in other (later) tests from the test suite, which reasonably think they start with all mouse buttons depressed. In the present case, canvas-13.1 failed because event generation of <ButtonRelease-1> was missing in test bind-32bug_79549a9134
-rw-r--r-- | tests/bind.test | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/tests/bind.test b/tests/bind.test index 387b119..c26cfcd 100644 --- a/tests/bind.test +++ b/tests/bind.test @@ -6100,6 +6100,7 @@ test bind-32 {-warp, window was destroyed before the idle callback DoWarp} -setu update } -body { event generate .t.f <Button-1> -warp 1 + event generate .t.f <ButtonRelease-1> destroy .t.f update ; # shall simply not crash } -cleanup { |