--- AnyEvent/t/68_poe_02_signals.t 2011/08/02 20:02:47 1.8 +++ AnyEvent/t/68_poe_02_signals.t 2011/08/12 18:41:30 1.9 @@ -8,8 +8,11 @@ } use AnyEvent; -BEGIN { eval q{use AnyEvent::Impl::POE;1} or ((print qq{1..0 # SKIP AnyEvent::Impl::POE not loadable -}), exit 0) } $^W = 0; + + 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::POE;1} or ((print qq{1..0 # SKIP AnyEvent::Impl::POE not loadable\n}), exit 0) } + $^W = 0; + $| = 1; print "1..5\n";