From 028486526465f344cbc60ab01f7612ecacaaa9f8 Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Sun, 18 Apr 2010 19:04:33 -0500 Subject: syswrite on the socket, for consistency --- lib/App/Termcast.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/App/Termcast.pm b/lib/App/Termcast.pm index a4268df..5b687e5 100644 --- a/lib/App/Termcast.pm +++ b/lib/App/Termcast.pm @@ -135,7 +135,7 @@ sub _build_socket { PeerPort => $self->port); die "Couldn't connect to " . $self->host . ": $!" unless $socket; - $socket->write('hello '.$self->user.' '.$self->password."\n"); + $socket->syswrite('hello '.$self->user.' '.$self->password."\n"); return $socket; } @@ -215,7 +215,7 @@ sub write_to_termcast { $self->clear_socket; return $self->socket_write(@_); } - $self->socket->write($buf); + $self->socket->syswrite($buf); } =head2 run @ARGV -- cgit v1.2.3-54-g00ecf