stas 2003/03/02 02:35:39
Modified: t/filter/TestFilter in_str_declined.pm Log: comment fix Revision Changes Path 1.2 +4 -4 modperl-2.0/t/filter/TestFilter/in_str_declined.pm Index: in_str_declined.pm =================================================================== RCS file: /home/cvs/modperl-2.0/t/filter/TestFilter/in_str_declined.pm,v retrieving revision 1.1 retrieving revision 1.2 diff -u -r1.1 -r1.2 --- in_str_declined.pm 2 Mar 2003 10:30:56 -0000 1.1 +++ in_str_declined.pm 2 Mar 2003 10:35:39 -0000 1.2 @@ -39,10 +39,10 @@ my $data = ModPerl::Test::read_post($r); } - # ~20k of input: makes it four bucket briages - # 2 full bucket brigades of 8k - # 1 half full brigade <8k - # eos bucket brigade + # ~20k of input makes it four bucket brigades: + # - 2 full bucket brigades of 8k + # - 1 half full brigade ~4k + # - 1 bucket brigade with EOS bucket my $expected = 4; my $invoked = $r->notes->get('invoked') || 0; ok t_cmp($expected, $invoked, "input stream filter declined");