]> git.sur5r.net Git - i3/i3/commitdiff
tests: fix t/19-match.t, needs a delay for i3 to pick up the UnmapNotify event
authorMichael Stapelberg <michael@stapelberg.de>
Wed, 9 Mar 2011 17:47:00 +0000 (18:47 +0100)
committerMichael Stapelberg <michael@stapelberg.de>
Wed, 9 Mar 2011 17:47:00 +0000 (18:47 +0100)
testcases/t/19-match.t
testcases/t/lib/i3test.pm

index 727109a040565fd6536f1690fa45cc6721a3f3b1..bfeda815315b89270e75ce4e8ec657ecb43a03c3 100644 (file)
@@ -46,9 +46,14 @@ $content = get_ws_content($tmp);
 ok(@{$content} == 1, 'window still there');
 
 # now kill the window
+cmd 'nop now killing the window';
 my $id = $win->{id};
 $i3->command(qq|[con_id="$id"] kill|)->recv;
 
+# give i3 some time to pick up the UnmapNotify event
+sleep 0.25;
+
+cmd 'nop checking if its gone';
 $content = get_ws_content($tmp);
 ok(@{$content} == 0, 'window killed');
 
index 87a3498124c482aa9c9865d366eb13d2e956798b..2251e25f852fba599b182a067951b660d70c9f39 100644 (file)
@@ -32,6 +32,7 @@ use Test::More" . (@_ > 0 ? " qw(@_)" : "") . ";
 use Test::Exception;
 use Data::Dumper;
 use AnyEvent::I3;
+use Time::HiRes qw(sleep);
 use Test::Deep qw(eq_deeply cmp_deeply cmp_set cmp_bag cmp_methods useclass noclass set bag subbagof superbagof subsetof supersetof superhashof subhashof bool str arraylength Isa ignore methods regexprefonly regexpmatches num regexponly scalref reftype hashkeysonly blessed array re hash regexpref hash_each shallow array_each code arrayelementsonly arraylengthonly scalarrefonly listmethods any hashkeys isa);
 use v5.10;
 use strict;