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 }