2 # vim:ts=4:sw=4:expandtab
3 # Beware that this test uses workspace 9 to perform some tests (it expects
4 # the workspace to be empty).
5 # TODO: skip it by default?
9 use Time::HiRes qw(sleep);
12 use_ok('X11::XCB::Connection') or BAIL_OUT('Cannot load X11::XCB::Connection');
15 my $x = X11::XCB::Connection->new;
19 # Switch to the nineth workspace
20 $i3->command('9')->recv;
22 #####################################################################
23 # Create two windows and put them in stacking mode
24 #####################################################################
26 my $top = i3test::open_standard_window($x);
28 my $bottom = i3test::open_standard_window($x);
31 $i3->command('s')->recv;
33 #####################################################################
34 # Add the urgency hint, switch to a different workspace and back again
35 #####################################################################
36 $top->add_hint('urgency');
39 $i3->command('1')->recv;
40 $i3->command('9')->recv;
41 $i3->command('1')->recv;
43 my $std = i3test::open_standard_window($x);
45 $std->add_hint('urgency');