koma/i3
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

testcases: let i3test.pm export $x, adapt testcases

Browse Source
This commit is contained in:
Maik Fischer
2011-11-21 21:39:50 +01:00
committed by Michael Stapelberg
parent 1b1d7941ec
commit 30ea33decb
52 changed files with 15 additions and 239 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
testcases/t/119-match.t
View File

@ -4,14 +4,13 @@
# Tests all kinds of matching methods
#
use i3test;
use X11::XCB qw(:all);
use X11::XCB qw(PROP_MODE_REPLACE WINDOW_CLASS_INPUT_OUTPUT);
my $tmp = fresh_workspace;
ok(@{get_ws_content($tmp)} == 0, 'no containers yet');
# Open a new window
my $x = X11::XCB::Connection->new;
my $window = open_window($x);
my $content = get_ws_content($tmp);
ok(@{$content} == 1, 'window mapped');