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>),
