--- AnyEvent-MP/MP/Node.pm 2009/08/04 23:35:51 1.10 +++ AnyEvent-MP/MP/Node.pm 2009/08/05 09:38:56 1.11 @@ -56,7 +56,7 @@ sub monitor { my ($self, $portid, $cb) = @_; - return $cb->("node failed conenction") + return $cb->(transport_error => "node unreachable") if $self->{failed}; my $list = $self->{lmon}{$portid} ||= [];