Hoppy::TCPHandler::Error - TCP handler class that will be used when client causes an error.


Hoppy documentation Contained in the Hoppy distribution.

Index


Code Index:

NAME

Top

Hoppy::TCPHandler::Error - TCP handler class that will be used when client causes an error.

SYNOPSIS

Top

DESCRIPTION

Top

TCP handler class that will be used when client causes an error.

METHODS

Top

do_handle($poe)

AUTHOR

Top

Takeshi Miki <miki@cpan.org>

LICENSE

Top

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

SEE ALSO

Top


Hoppy documentation Contained in the Hoppy distribution.

package Hoppy::TCPHandler::Error;
use strict;
use warnings;
use base qw( Hoppy::Base );

sub do_handle {
    my $self       = shift;
    my $poe        = shift;
    my $c          = $self->context;
    my $session_id = $poe->session->ID;
    my $user       = $c->room->fetch_user_from_session_id($session_id);
    my $user_id;
    if ($user) {
        $user_id = $user->user_id;
    }
    if ( my $hook = $c->hook->{client_error} ) {
        $hook->work( { poe => $poe, user_id => $user_id } );
    }
}

1;
__END__