X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=scpubgit%2FObject-Remote.git;a=blobdiff_plain;f=lib%2FObject%2FRemote%2FConnectionServer.pm;h=330cb241b549a5248eebeb74ba43333b48f931c0;hp=13bf81147eebcd048f6d2107baaf456b8400aecd;hb=353556c4b81bcb3a0c3fff934eff5ab2f19733d4;hpb=b7a853b30e7397854a813f6a5878e50703a20079 diff --git a/lib/Object/Remote/ConnectionServer.pm b/lib/Object/Remote/ConnectionServer.pm index 13bf811..330cb24 100644 --- a/lib/Object/Remote/ConnectionServer.pm +++ b/lib/Object/Remote/ConnectionServer.pm @@ -5,7 +5,6 @@ use Module::Runtime qw(use_module); use Object::Remote; use Object::Remote::Logging qw( :log :dlog ); use IO::Socket::UNIX; -use POSIX (); use Moo; has listen_on => ( @@ -65,9 +64,6 @@ sub _listen_ready { $f->on_ready(sub { undef($c) }); log_trace { "marking the future as done" }; $c->ready_future->done; - #TODO see if this runs on the controller or the remote node - #if this runs on the controller a poorly behaved remote node - #could cause the print() to block but it's a very low probability Dlog_trace { "Sending 'Shere' to socket $_" } $new; print $new "Shere\n" or die "Couldn't send to new socket: $!"; log_debug { "Connection has been fully handled" };