complete-run: eliminate dependency on EV

diff --git a/testcases/complete-run.pl b/testcases/complete-run.pl
index 952f10c6e8b2af44c40a7d51f733be5b17bd407e..e7651022551efc238b9a2c63870968229e467b25 100755 (executable)
--- a/testcases/complete-run.pl
+++ b/testcases/complete-run.pl
@@ -27,16 +27,18 @@ use TAP::Parser::Aggregator;
 use lib qw(lib);
 use SocketActivation;
 # the following modules are not shipped with Perl
-use EV;
 use AnyEvent;
 use AnyEvent::Handle;
 use AnyEvent::I3 qw(:all);
 use X11::XCB;
 
-# Install a dummy CHLD handler to overwrite the CHLD handler of AnyEvent / EV.
+# We actually use AnyEvent to make sure it loads an event loop implementation.
+# Afterwards, we overwrite SIGCHLD:
+my $cv = AnyEvent->condvar;
+
+# Install a dummy CHLD handler to overwrite the CHLD handler of AnyEvent.
 # AnyEvent’s handler wait()s for every child which conflicts with TAP (TAP
 # needs to get the exit status to determine if a test is successful).
-# XXX: we could maybe also use a different loop than the default loop in EV?
 $SIG{CHLD} = sub {
 };
 
@@ -103,8 +105,6 @@ my $harness = TAP::Harness->new({ });
 my $aggregator = TAP::Parser::Aggregator->new();
 $aggregator->start();
 
-my $cv = AnyEvent->condvar;
-
 # We start tests concurrently: For each display, one test gets started. Every
 # test starts another test after completing.
 take_job($_) for @wdisplays;