use correct variables

jasonmay · May 11, 2011 · fab1245 · fab1245
1 parent 059288b
commit fab1245
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/lib/App/Termcast/Server/Telnet/Acceptor.pm b/lib/App/Termcast/Server/Telnet/Acceptor.pm
@@ -49,8 +49,8 @@ sub on_accept {
             )
         )
     );
-    $self->listener->syswrite($iac);
-    $self->telnet_dispatcher->send_connection_list($self->listener);
+    $args->{socket}->syswrite($iac);
+    $self->telnet_dispatcher->send_connection_list($args->{socket});
 
     $self->remember_connection($stream);
 }

diff --git a/lib/App/Termcast/Server/Telnet/Stream/Connection.pm b/lib/App/Termcast/Server/Telnet/Stream/Connection.pm
@@ -24,7 +24,7 @@ sub on_data {
     my ($self, $args) = @_;
 
     warn "data: $args->{data}\n";
-    $self->dispatcher->dispatch_telnet_input($args->{data});
+    $self->dispatcher->dispatch_telnet_input($self->handle, $args->{data});
 }
 
 __PACKAGE__->meta->make_immutable;