From c21a58affc370fd2ed2f33c22e857ab4e519c264 Mon Sep 17 00:00:00 2001 From: erickson Date: Wed, 11 Oct 2006 16:56:42 +0000 Subject: [PATCH] added a comment git-svn-id: svn://svn.open-ils.org/ILS/trunk@6443 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- OpenSRF/src/perlmods/OpenSRF/Transport/SlimJabber/Client.pm | 3 +++ 1 file changed, 3 insertions(+) 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; -- 2.43.2