diff options
author | culler <culler> | 2024-05-31 22:36:47 (GMT) |
---|---|---|
committer | culler <culler> | 2024-05-31 22:36:47 (GMT) |
commit | a075e134b1d8a47abdce9fcedf5266529846f271 (patch) | |
tree | 522db359d5d40a56f9f47090b38b2903b6b32777 /tests | |
parent | 1419bbfee25ed9da6b99303e536b35dce74d91db (diff) | |
download | tk-a075e134b1d8a47abdce9fcedf5266529846f271.zip tk-a075e134b1d8a47abdce9fcedf5266529846f271.tar.gz tk-a075e134b1d8a47abdce9fcedf5266529846f271.tar.bz2 |
keep the root on the screen for event tests
Diffstat (limited to 'tests')
-rw-r--r-- | tests/event.test | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/event.test b/tests/event.test index 585eb96..ea46dd1 100644 --- a/tests/event.test +++ b/tests/event.test @@ -908,7 +908,7 @@ proc create_and_pack_frames {{w {}}} { proc setup_win_mousepointer {w} { # Position the window and the mouse pointer as an initial state for some tests. # The so-called "pointer window" is the $w window that will now contain the mouse pointer. - wm geometry . +700+700; # root window out of our way - must not cover windows from event-9.1* + wm geometry . +700+400; # root window out of our way - must not cover windows from event-9.1* toplevel $w pack propagate $w 0 wm geometry $w 300x300+100+100 |