File Coverage

blib/lib/PocketIO/Broadcast.pm

Criterion	Covered	Total	%
statement	20	23	86.9
branch			n/a
condition			n/a
subroutine	6	7	85.7
pod	3	3	100.0
total	29	33	87.8

package PocketIO::Broadcast;

use strict;
use warnings;

use base 'PocketIO::Sockets';

use PocketIO::Room;

sub send {
    my $self = shift;

    $self->{pool}->broadcast($self->{conn}, @_);

    return $self;
}

sub emit {
    my $self = shift;
    my $name = shift;

    my $event = $self->_build_event_message($name, @_);

    $self->{pool}->broadcast($self->{conn}, $event);

    return $self;
}


sub to {
    my $self = shift;
    my ($room) = @_;

    return PocketIO::Room->new(
        room => $room,
        conn => $self->{conn},
        pool => $self->{pool}
    );
}

1;
__END__