dougm       00/09/27 13:04:01

  Modified:    t/modules request.t
  Log:
  binmode for win32
  
  Revision  Changes    Path
  1.10      +1 -0      modperl/t/modules/request.t
  
  Index: request.t
  ===================================================================
  RCS file: /home/cvs/modperl/t/modules/request.t,v
  retrieving revision 1.9
  retrieving revision 1.10
  diff -u -r1.9 -r1.10
  --- request.t 2000/08/31 05:54:11     1.9
  +++ request.t 2000/09/27 20:04:00     1.10
  @@ -125,6 +125,7 @@
       my $lines = 0;
       local *FH;
       open FH, $file or die "open $file $!";
  +    binmode FH; #for win32
       ++$lines while defined <FH>;
       close FH;
       my(@headers);
  
  
  

Reply via email to