From b03b14ec262f962d2b52f7ebf29a21d5b59ed7e7 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/OpenSRF/trunk@792 9efc2488-bf62-4759-914b-345cdb29e865 --- src/perlmods/OpenSRF/Transport/SlimJabber/Client.pm | 3 +++ 1 file changed, 3 insertions(+) diff --git a/src/perlmods/OpenSRF/Transport/SlimJabber/Client.pm b/src/perlmods/OpenSRF/Transport/SlimJabber/Client.pm index 81c75f7..e2374f4 100644 --- a/src/perlmods/OpenSRF/Transport/SlimJabber/Client.pm +++ b/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