loncom/LondConnection.pm - diff

Return to LondConnection.pm CVS log

Up to [LON-CAPA] / loncom

version 1.6, 2003/06/13 02:56:45	version 1.7, 2003/07/02 01:12:35
Line 215 sub Readable {	Line 215 sub Readable {
my $rv = $socket->recv($data, POSIX::BUFSIZ, 0);	my $rv = $socket->recv($data, POSIX::BUFSIZ, 0);
my $errno = $! + 0; # Force numeric context.	my $errno = $! + 0; # Force numeric context.

unless (defined($rv) && length($data)) { # Read failed,	unless (defined($rv) && (length($data)> 0)) {# Read failed,
if(($errno == POSIX::EWOULDBLOCK) \|\|	if(($errno == POSIX::EWOULDBLOCK) \|\|
($errno == POSIX::EAGAIN) \|\|	($errno == POSIX::EAGAIN) \|\|
($errno == POSIX::EINTR) \|\|	($errno == POSIX::EINTR) \|\|