--- AnyEvent/t/65_event_07_io.t 2011/07/04 21:14:28 1.4 +++ AnyEvent/t/65_event_07_io.t 2011/08/02 20:02:46 1.5 @@ -26,7 +26,7 @@ print "ok 3\n"; -{ my $cv = AnyEvent->condvar; $t = AnyEvent->timer (after => 0.05, cb => sub { $cv->send }); $cv->wait } +{ my $cv = AnyEvent->condvar; $t = AnyEvent->timer (after => 0.05, cb => sub { $cv->send }); $cv->recv } print "ok 4\n"; @@ -42,7 +42,7 @@ $cv->send; }); -$cv = AnyEvent->condvar; $cv->wait; +$cv = AnyEvent->condvar; $cv->recv; print "ok 10\n"; @@ -59,7 +59,7 @@ print "ok 11\n"; -{ my $cv = AnyEvent->condvar; $t = AnyEvent->timer (after => 0.05, cb => sub { $cv->send }); $cv->wait } +{ my $cv = AnyEvent->condvar; $t = AnyEvent->timer (after => 0.05, cb => sub { $cv->send }); $cv->recv } print "ok 12\n"; @@ -75,7 +75,7 @@ $cv->send; }); -$cv = AnyEvent->condvar; $cv->wait; +$cv = AnyEvent->condvar; $cv->recv; print "ok 18\n";