perl-modperl-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From s...@apache.org
Subject cvs commit: modperl-2.0/t/response/TestAPR perlio.pm
Date Fri, 21 Jun 2002 15:45:06 GMT
stas        2002/06/21 08:45:06

  Modified:    t/response/TestAPR perlio.pm
  Log:
  only a comments fixes
  
  Revision  Changes    Path
  1.12      +2 -2      modperl-2.0/t/response/TestAPR/perlio.pm
  
  Index: perlio.pm
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/t/response/TestAPR/perlio.pm,v
  retrieving revision 1.11
  retrieving revision 1.12
  diff -u -r1.11 -r1.12
  --- perlio.pm	21 Jun 2002 15:28:43 -0000	1.11
  +++ perlio.pm	21 Jun 2002 15:45:06 -0000	1.12
  @@ -12,8 +12,8 @@
   use Apache::Const -compile => 'OK';
   use constant HAVE_PERLIO => eval { require APR::PerlIO };
   
  -#XXX: feel free to enable if largefile support is not enabled in Perl
   #XXX: APR::LARGE_FILES_CONFLICT constant?
  +#XXX: you can set to zero if largefile support is not enabled in Perl
   use constant LARGE_FILES_CONFLICT => 1;
   
   sub handler {
  @@ -197,7 +197,7 @@
   
           # buffer up
           $oldfh = select($wfh); $| = 0; select($oldfh);
  -        print $wfh $expected; # must be flushed to disk immediately
  +        print $wfh $expected; # should be buffered up and not flushed
   
           ok t_cmp(undef,
                    scalar(<$rfh>),
  
  
  

Mime
View raw message