| … | |
… | |
| 176 | my $endpoint = pop @endpoints; |
176 | my $endpoint = pop @endpoints; |
| 177 | |
177 | |
| 178 | AE::log 9 => "connecting to $self->{id} at $endpoint"; |
178 | AE::log 9 => "connecting to $self->{id} at $endpoint"; |
| 179 | |
179 | |
| 180 | $self->{trial}{$endpoint} ||= do { |
180 | $self->{trial}{$endpoint} ||= do { |
| 181 | use Carp;AnyEvent::Socket::parse_hostport $endpoint or Carp::confess "not a reslved blabla\n";#d# |
|
|
| 182 | my ($host, $port) = AnyEvent::Socket::parse_hostport $endpoint |
181 | my ($host, $port) = AnyEvent::Socket::parse_hostport $endpoint |
| 183 | or return AE::log critical => "$self->{id}: '$endpoint' is not a resolved node reference."; |
182 | or return AE::log critical => "$self->{id}: '$endpoint' is not a resolved node reference."; |
| 184 | |
183 | |
| 185 | AnyEvent::MP::Transport::mp_connect |
184 | AnyEvent::MP::Transport::mp_connect |
| 186 | $host, $port, |
185 | $host, $port, |
