--- AnyEvent/t/04_condvar.t 2009/07/18 00:05:29 1.3 +++ AnyEvent/t/04_condvar.t 2011/08/02 20:02:45 1.5 @@ -1,5 +1,5 @@ use AnyEvent; -use AnyEvent::Impl::Perl; +BEGIN { require AnyEvent::Impl::Perl unless $ENV{PERL_ANYEVENT_MODEL} } $| = 1; print "1..21\n"; @@ -27,7 +27,7 @@ }); print "ok 2\n"; - $cv->wait; + $cv->recv; print "ok 8\n"; my @x = $cv->recv;