[poe-commits] poe/lib/POE/Loop Select.pm,1.58,1.59

[<rc...@us...>]

Update of /cvsroot/poe/poe/lib/POE/Loop
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv5815/lib/POE/Loop

Modified Files:
	Select.pm 
Log Message:
Joel Bernstein pointed out a few warnings when POE is run under -W
(rather than -w).  We can't have that, and now we don't.


Index: Select.pm
===================================================================
RCS file: /cvsroot/poe/poe/lib/POE/Loop/Select.pm,v
retrieving revision 1.58
retrieving revision 1.59
diff -C2 -d -r1.58 -r1.59
*** Select.pm	2 Feb 2005 04:44:34 -0000	1.58
--- Select.pm	22 Aug 2005 17:34:25 -0000	1.59
***************
*** 191,195 ****
      if (@filenos) {
        # Check filehandles, or wait for a period of time to elapse.
!       my $hits = select(
          my $rout = $loop_vectors[MODE_RD],
          my $wout = $loop_vectors[MODE_WR],
--- 191,195 ----
      if (@filenos) {
        # Check filehandles, or wait for a period of time to elapse.
!       my $hits = CORE::select(
          my $rout = $loop_vectors[MODE_RD],
          my $wout = $loop_vectors[MODE_WR],
***************
*** 296,300 ****
        }
        else {
!         select(undef, undef, undef, $timeout);
        }
      }
--- 296,300 ----
        }
        else {
! 				CORE::select(undef, undef, undef, $timeout);
        }
      }