1 package Object::Remote::LogDestination;
4 use Scalar::Util qw(weaken);
6 has logger => ( is => 'ro', required => 1 );
7 has subscriptions => ( is => 'ro', required => 1, default => sub { [] } );
10 my ($self, $router, $selector) = @_;
11 my $subscription = $router->subscribe($self->logger, $selector);
12 push(@{ $self->subscriptions }, $subscription);
17 my ($self, $router) = @_;
18 return $self->select($router, sub { 1 });