Permalink
Browse files

Make sure tests use the default pure Perl AnyEvent::Impl because the …

…client may behave in ways that make many tests fail under other event loops
  • Loading branch information...
sanko committed Sep 15, 2010
1 parent 3c81010 commit 9eb40ca69c18819b56042e3e7e8dda3b5da6e1d6
@@ -8,6 +8,7 @@ package t::10000_by_class::Net::BitTorrent::DHT;
use 5.010.000;
use Test::Moose;
use Test::More;
+ use AnyEvent::Impl::Perl; # Timing is different than with EV. Go figure.
use AnyEvent;
#
@@ -3,6 +3,7 @@ package t::10000_by_class::Net::BitTorrent::Protocol::BEP03::Peer::Incoming;
use strict;
use warnings;
use 5.010.000;
+ use AnyEvent::Impl::Perl; # Timing is different than with EV. Go figure.
use AnyEvent;
use AnyEvent::Socket qw[tcp_connect];
use AnyEvent::Handle;
@@ -3,6 +3,7 @@ package t::10000_by_class::Net::BitTorrent::Protocol::BEP03::Peer::Outgoing;
use strict;
use warnings;
use 5.010.000;
+ use AnyEvent::Impl::Perl; # Timing is different than with EV. Go figure.
use AnyEvent;
use AnyEvent::Socket qw[tcp_server];
use Test::Most;
@@ -3,6 +3,7 @@ use warnings;
use lib '../../lib';
use Test::More;
use File::Temp;
+use AnyEvent::Impl::Perl; # Timing is different than with EV. Go figure.
use AnyEvent;
use lib reverse 'lib', '../lib', '../../lib';
use Net::BitTorrent;

0 comments on commit 9eb40ca

Please sign in to comment.