From: erickson Date: Wed, 11 Oct 2006 16:44:51 +0000 (+0000) Subject: uncomment some unnecessary code X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=6a0dd04e47251d8e021675ae193af5210ff98453;p=working%2FOpenSRF.git 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 --- 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;