2 # vim:ts=4:sw=4:expandtab
4 # Tests if WM_STATE is WM_STATE_NORMAL when mapped and WM_STATE_WITHDRAWN when
8 use X11::XCB::Connection;
11 my $x = X11::XCB::Connection->new;
14 my $tmp = fresh_workspace;
16 ok(@{get_ws_content($tmp)} == 0, 'no containers yet');
18 my $first = open_standard_window($x);
19 my $second = open_standard_window($x);
21 is($x->input_focus, $second->id, 'second window focused');
22 ok(@{get_ws_content($tmp)} == 2, 'two containers opened');
27 ##############################################################
28 # 1: open two windows (in the same client), kill one and see if
29 # the other one is still there
30 ##############################################################
32 my $tmp = two_windows;
38 ok(@{get_ws_content($tmp)} == 1, 'one container left after killing');
40 ##############################################################
41 # 2: same test case as test 1, but with the explicit variant
43 ##############################################################
45 my $tmp = two_windows;
51 ok(@{get_ws_content($tmp)} == 1, 'one container left after killing');
53 ##############################################################
54 # 3: open two windows (in the same client), use 'kill client'
55 # and check if both are gone
56 ##############################################################
58 my $tmp = two_windows;
64 ok(@{get_ws_content($tmp)} == 0, 'no containers left after killing');