stas 2003/09/18 01:10:32
Modified: t/filter/TestFilter in_str_consume.pm
Log:
add missing:
use Apache::RequestRec ();
use Apache::RequestIO ();
Revision Changes Path
1.9 +4 -0 modperl-2.0/t/filter/TestFilter/in_str_consume.pm
Index: in_str_consume.pm
===================================================================
RCS file: /home/cvs/modperl-2.0/t/filter/TestFilter/in_str_consume.pm,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -u -r1.8 -r1.9
--- in_str_consume.pm 27 Aug 2003 04:42:38 -0000 1.8
+++ in_str_consume.pm 18 Sep 2003 08:10:32 -0000 1.9
@@ -42,6 +42,9 @@
use Apache::Filter ();
use Apache::TestTrace;
+use Apache::RequestRec ();
+use Apache::RequestIO ();
+
use Apache::Const -compile => qw(OK M_POST);
use constant READ_BYTES_TOTAL => 105;
@@ -66,6 +69,7 @@
$ctx->{data} .= $buffer;
$wanted_total -= $len;
$wanted -= $len;
+ debug "FILTER READ: [$buffer]";
debug "FILTER READ: $len ($wanted_total more to go)";
last unless $len; # no more data to read in this bb
}