uncomment some unnecessary code

git-svn-id: svn://svn.open-ils.org/OpenSRF/trunk@791 9efc2488-bf62-4759-914b-345cdb29e865

diff --git a/src/perlmods/OpenSRF/Transport/SlimJabber/Client.pm b/src/perlmods/OpenSRF/Transport/SlimJabber/Client.pm
index b61dd31..81c75f7 100644 (file)
--- a/src/perlmods/OpenSRF/Transport/SlimJabber/Client.pm
+++ b/src/perlmods/OpenSRF/Transport/SlimJabber/Client.pm
@@ -253,10 +253,11 @@ sub timed_read {
                                $self->{temp_buffer} = '';
                                #####
 
-                               my $ff =  fcntl($fh, F_GETFL, 0);
-                               if ($ff == ($ff | O_NONBLOCK) and $timeout > 0 ) {
+                               # This code is no longer in use
+                               #my $ff =  fcntl($fh, F_GETFL, 0);
+                               #if ($ff == ($ff | O_NONBLOCK) and $timeout > 0 ) {
                                        #throw OpenSRF::EX::ERROR ("File flags are set to NONBLOCK but timeout is $timeout", ERROR );
-                               }
+                               #}
 
                                my $t_buf = "";
                                my $read_size = 1024; my $f = 0;