--- AnyEvent/t/65_event_07_io.t 2009/07/20 22:39:57 1.3 +++ AnyEvent/t/65_event_07_io.t 2011/08/02 20:02:46 1.5 @@ -1,6 +1,7 @@ use AnyEvent; use AnyEvent::Util; -BEGIN { eval q{use AnyEvent::Impl::Event;1} or ((print qq{1..0 # SKIP AnyEvent::Impl::Event not loadable}), exit 0) } +BEGIN { eval q{use AnyEvent::Impl::Event;1} or ((print qq{1..0 # SKIP AnyEvent::Impl::Event not loadable +}), exit 0) } $| = 1; print "1..18\n"; @@ -25,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"; @@ -41,7 +42,7 @@ $cv->send; }); -$cv = AnyEvent->condvar; $cv->wait; +$cv = AnyEvent->condvar; $cv->recv; print "ok 10\n"; @@ -58,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"; @@ -74,7 +75,7 @@ $cv->send; }); -$cv = AnyEvent->condvar; $cv->wait; +$cv = AnyEvent->condvar; $cv->recv; print "ok 18\n";