| … | |
… | |
| 415 | |
415 | |
| 416 | # connect to all seednodes |
416 | # connect to all seednodes |
| 417 | AnyEvent::MP::Global::set_seeds (map $_->recv, map _resolve $_, @$seeds); |
417 | AnyEvent::MP::Global::set_seeds (map $_->recv, map _resolve $_, @$seeds); |
| 418 | |
418 | |
| 419 | for (@{ $CONFIG->{services} }) { |
419 | for (@{ $CONFIG->{services} }) { |
|
|
420 | if (ref) { |
|
|
421 | my ($func, @args) = @$_; |
|
|
422 | (load_func $func)->(@args); |
| 420 | if (s/::$//) { |
423 | } elsif (s/::$//) { |
| 421 | eval "require $_"; |
424 | eval "require $_"; |
| 422 | die $@ if $@; |
425 | die $@ if $@; |
| 423 | } else { |
426 | } else { |
| 424 | (load_func $_)->(); |
427 | (load_func $_)->(); |
| 425 | } |
428 | } |
