… | |
… | |
322 | if $self->{node} && $self->{node}{transport} == $self; |
322 | if $self->{node} && $self->{node}{transport} == $self; |
323 | |
323 | |
324 | (delete $self->{release})->() |
324 | (delete $self->{release})->() |
325 | if exists $self->{release}; |
325 | if exists $self->{release}; |
326 | |
326 | |
327 | $AnyEvent::MP::Kernel::WARN->("$self->{peerhost}:$self->{peerport}: $msg"); |
327 | # $AnyEvent::MP::Kernel::WARN->(7, "$self->{peerhost}:$self->{peerport}: $msg"); |
328 | $self->destroy; |
328 | $self->destroy; |
329 | } |
329 | } |
330 | |
330 | |
331 | sub connected { |
331 | sub connected { |
332 | my ($self) = @_; |
332 | my ($self) = @_; |