tests: explicitly declare done_testing in subtest

diff --git a/testcases/t/58-wm_take_focus.t b/testcases/t/58-wm_take_focus.t
index a7552c24859c30380ec81ace84fee81e740a7bc9..eca3cef215189a8067c204656b1cb636c32e850d 100644 (file)
--- a/testcases/t/58-wm_take_focus.t
+++ b/testcases/t/58-wm_take_focus.t
@@ -4,12 +4,12 @@
 # Tests if the WM_TAKE_FOCUS protocol is correctly handled by i3
 #
 use X11::XCB qw(:all);
-use EV;
-use AnyEvent;
 use i3test;
 use v5.10;
 
 BEGIN {
+    use_ok('EV');
+    use_ok('AnyEvent');
     use_ok('X11::XCB::Window');
     use_ok('X11::XCB::Event::Generic');
     use_ok('X11::XCB::Event::MapNotify');
@@ -59,6 +59,8 @@ subtest 'Window without WM_TAKE_FOCUS', sub {
 
     my $result = $cv->recv;
     ok($result, 'cv result');
+
+    done_testing;
 };
 
 subtest 'Window with WM_TAKE_FOCUS', sub {
@@ -105,6 +107,8 @@ subtest 'Window with WM_TAKE_FOCUS', sub {
         my ($data, $time) = unpack("L2", $result);
         is($data, $x->atom(name => 'WM_TAKE_FOCUS')->id, 'first uint32_t contains WM_TAKE_FOCUS atom');
     }
+
+    done_testing;
 };