]> git.sur5r.net Git - i3/i3/blob - testcases/t/05-ipc.t
0d18040ec1efb8c8ff157400ddcaf5bed9bd2a8e
[i3/i3] / testcases / t / 05-ipc.t
1 #!perl
2 # vim:ts=4:sw=4:expandtab
3
4 use i3test;
5
6 my $x = X11::XCB::Connection->new;
7
8 fresh_workspace;
9
10 #####################################################################
11 # Ensure IPC works by switching workspaces
12 #####################################################################
13
14 # Create a window so we can get a focus different from NULL
15 my $window = open_standard_window($x);
16 sync_with_i3($x);
17
18 my $focus = $x->input_focus;
19
20 # Switch to another workspace
21 fresh_workspace;
22
23 sync_with_i3($x);
24 my $new_focus = $x->input_focus;
25 isnt($focus, $new_focus, "Focus changed");
26
27 done_testing;