| … | |
… | |
| 391 | |
391 | |
| 392 | if ($MASTER) { |
392 | if ($MASTER) { |
| 393 | snd $port{$MASTER}, "seedme1"; |
393 | snd $port{$MASTER}, "seedme1"; |
| 394 | $AnyEvent::MP::Kernel::WARN->(7, "selected new master: $MASTER."); |
394 | $AnyEvent::MP::Kernel::WARN->(7, "selected new master: $MASTER."); |
| 395 | } else { |
395 | } else { |
| 396 | $AnyEvent::MP::Kernel::WARN->(1, "no contact to any other node."); |
396 | $AnyEvent::MP::Kernel::WARN->(1, "no contact to any other node, cannot seed."); |
| 397 | } |
397 | } |
| 398 | } |
398 | } |
| 399 | |
399 | |
| 400 | sub mon_node { |
400 | sub mon_node { |
| 401 | my ($node, $is_up) = @_; |
401 | my ($node, $is_up) = @_; |
