--- AnyEvent/t/03_child.t 2009/05/13 15:19:43 1.11 +++ AnyEvent/t/03_child.t 2009/07/09 01:08:22 1.12 @@ -67,6 +67,12 @@ exit 0; }); +my $inter = AnyEvent->timer (after => 4, cb => sub { + print "not ok 5 # inter\n";#d# temporary + print "not ok 6 # inter\n";#d# temporary + $cv2->send; +}); + $cv2->wait; print "ok 7\n";