… | |
… | |
168 | package AnyEvent::MP::Node::Self; |
168 | package AnyEvent::MP::Node::Self; |
169 | |
169 | |
170 | use base "AnyEvent::MP::Node"; |
170 | use base "AnyEvent::MP::Node"; |
171 | |
171 | |
172 | sub set_transport { |
172 | sub set_transport { |
173 | die "FATAL error, set_transport was called"; |
173 | Carp::confess "FATAL error, set_transport was called on local node"; |
174 | } |
174 | } |
175 | |
175 | |
176 | sub send { |
176 | sub send { |
177 | local $AnyEvent::MP::Base::SRCNODE = $_[0]; |
177 | local $AnyEvent::MP::Base::SRCNODE = $_[0]; |
178 | AnyEvent::MP::Base::_inject (@{ $_[1] }); |
178 | AnyEvent::MP::Base::_inject (@{ $_[1] }); |