]> git.sur5r.net Git - i3/i3/blob - testcases/t/164-kill-win-vs-client.t
Merge branch 'master' into next
[i3/i3] / testcases / t / 164-kill-win-vs-client.t
1 #!perl
2 # vim:ts=4:sw=4:expandtab
3 #
4 # Tests if WM_STATE is WM_STATE_NORMAL when mapped and WM_STATE_WITHDRAWN when
5 # unmapped.
6 #
7 use i3test;
8
9 sub two_windows {
10     my $tmp = fresh_workspace;
11
12     ok(@{get_ws_content($tmp)} == 0, 'no containers yet');
13
14     my $first = open_window;
15     my $second = open_window;
16
17     is($x->input_focus, $second->id, 'second window focused');
18     ok(@{get_ws_content($tmp)} == 2, 'two containers opened');
19
20     return $tmp;
21 }
22
23 ##############################################################
24 # 1: open two windows (in the same client), kill one and see if
25 # the other one is still there
26 ##############################################################
27
28 my $tmp = two_windows;
29
30 cmd 'kill';
31
32 sleep 0.25;
33
34 ok(@{get_ws_content($tmp)} == 1, 'one container left after killing');
35
36 ##############################################################
37 # 2: same test case as test 1, but with the explicit variant
38 # 'kill window'
39 ##############################################################
40
41 $tmp = two_windows;
42
43 cmd 'kill window';
44
45 sleep 0.25;
46
47 ok(@{get_ws_content($tmp)} == 1, 'one container left after killing');
48
49 ##############################################################
50 # 3: open two windows (in the same client), use 'kill client'
51 # and check if both are gone
52 ##############################################################
53
54 $tmp = two_windows;
55
56 cmd 'kill client';
57
58 sleep 0.25;
59
60 ok(@{get_ws_content($tmp)} == 0, 'no containers left after killing');
61
62 done_testing;