testcases: let i3test.pm export $x, adapt testcases
This commit is contained in:
committed by
Michael Stapelberg
parent
1b1d7941ec
commit
30ea33decb
@ -3,14 +3,8 @@
|
||||
# Check if numbered workspaces and named workspaces are sorted in the right way
|
||||
# in get_workspaces IPC output (necessary for i3bar etc.).
|
||||
use i3test;
|
||||
use X11::XCB qw(:all);
|
||||
|
||||
BEGIN {
|
||||
use_ok('X11::XCB::Window');
|
||||
}
|
||||
|
||||
my $i3 = i3(get_socket_path());
|
||||
my $x = X11::XCB::Connection->new;
|
||||
|
||||
sub check_order {
|
||||
my ($msg) = @_;
|
||||
|
Reference in New Issue
Block a user