From: erickson Date: Wed, 11 Oct 2006 16:56:42 +0000 (+0000) Subject: added a comment X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=c21a58affc370fd2ed2f33c22e857ab4e519c264;p=evergreen%2Fpines.git added a comment git-svn-id: svn://svn.open-ils.org/ILS/trunk@6443 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- diff --git a/OpenSRF/src/perlmods/OpenSRF/Transport/SlimJabber/Client.pm b/OpenSRF/src/perlmods/OpenSRF/Transport/SlimJabber/Client.pm index 81c75f714f..e2374f4a6f 100644 --- a/OpenSRF/src/perlmods/OpenSRF/Transport/SlimJabber/Client.pm +++ b/OpenSRF/src/perlmods/OpenSRF/Transport/SlimJabber/Client.pm @@ -269,8 +269,11 @@ sub timed_read { } # XXX Change me to debug/internal at some point, this is for testing... + # XXX Found a race condition where reading >= $read_size bytes of data + # will fail if the log line below is removed. $logger->info("timed_read() read $n bytes of data"); + $buffer .= $t_buf; if( $n < $read_size ) { #reset_fl( $fh, $f ) if $f;