--- AnyEvent/t/69_ev_01_basic.t 2009/07/09 22:49:18 1.2 +++ AnyEvent/t/69_ev_01_basic.t 2011/08/12 18:41:30 1.6 @@ -1,8 +1,11 @@ -$|=1; -BEGIN { print "1..6\n" } - use AnyEvent; -use AnyEvent::Impl::EV; + + BEGIN { $ENV{PERL_ANYEVENT_LOOP_TESTS} or ((print qq{1..0 # SKIP PERL_ANYEVENT_LOOP_TESTS not true\n}), exit 0) } + BEGIN { eval q{use AnyEvent::Impl::EV;1} or ((print qq{1..0 # SKIP AnyEvent::Impl::EV not loadable\n}), exit 0) } + + + +$| = 1; print "1..6\n"; print "ok 1\n";