… | |
… | |
208 | sub connect { |
208 | sub connect { |
209 | # we are trivially connected |
209 | # we are trivially connected |
210 | } |
210 | } |
211 | |
211 | |
212 | # delay every so often to avoid recursion, also used to delay after spawn |
212 | # delay every so often to avoid recursion, also used to delay after spawn |
213 | our $DELAY; |
213 | our $DELAY = -50; |
214 | our @DELAY; |
214 | our @DELAY; |
215 | our $DELAY_W; |
215 | our $DELAY_W; |
216 | |
216 | |
217 | sub _send_delayed { |
217 | sub _send_delayed { |
218 | local $AnyEvent::MP::Kernel::SRCNODE = $AnyEvent::MP::Kernel::NODE{""}; |
218 | local $AnyEvent::MP::Kernel::SRCNODE = $AnyEvent::MP::Kernel::NODE{""}; |