cvs commit: modperl-2.0/lib/Apache compat.pm

[dougm]

dougm       02/05/12 16:48:16

  Modified:    lib/Apache compat.pm
  Log:
  send_fd_length filehandle needs binmode
  
  Revision  Changes    Path
  1.41      +2 -0      modperl-2.0/lib/Apache/compat.pm
  
  Index: compat.pm
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/lib/Apache/compat.pm,v
  retrieving revision 1.40
  retrieving revision 1.41
  diff -u -r1.40 -r1.41
  --- compat.pm 10 May 2002 16:49:10 -0000      1.40
  +++ compat.pm 12 May 2002 23:48:16 -0000      1.41
  @@ -262,6 +262,8 @@
           $len = IOBUFSIZE;
       }
   
  +    binmode $fh;
  +
       while (CORE::read($fh, $buff, $len)) {
           $total_bytes_sent += $r->puts($buff);
       }