testcases: let i3test.pm export $x, adapt testcases
This commit is contained in:
committed by
Michael Stapelberg
parent
1b1d7941ec
commit
30ea33decb
@ -5,11 +5,9 @@
|
||||
# restart.
|
||||
# found in eb8ad348b28e243cba1972e802ca8ee636472fc9
|
||||
#
|
||||
use X11::XCB qw(:all);
|
||||
use List::Util qw(first);
|
||||
use i3test;
|
||||
|
||||
my $x = X11::XCB::Connection->new;
|
||||
my $i3 = i3(get_socket_path());
|
||||
my $tmp = fresh_workspace;
|
||||
my $window = open_window($x);
|
||||
|
Reference in New Issue
Block a user