--- AnyEvent/t/handle/04_listen.t 2008/04/27 19:36:55 1.2 +++ AnyEvent/t/handle/04_listen.t 2008/05/02 09:04:57 1.3 @@ -19,7 +19,7 @@ ); my $ae_sock = AnyEvent::Socket->new ( - PeerAddr => "localhost:32391", + PeerAddr => "127.0.0.1:32391", on_connect => sub { my ($ae_sock, $error) = @_; if ($error) { diag "connection failed: $!"; $cv->broadcast; return }