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/filter/TestFilter out_bbs_basic.pm
Date Thu, 24 Apr 2003 04:29:06 GMT
stas        2003/04/23 21:29:06

  Modified:    t/filter/TestFilter out_bbs_basic.pm
  Log:
  insert eos bucket when ignoring eos buckets on read
  
  Revision  Changes    Path
  1.3       +2 -0      modperl-2.0/t/filter/TestFilter/out_bbs_basic.pm
  
  Index: out_bbs_basic.pm
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/t/filter/TestFilter/out_bbs_basic.pm,v
  retrieving revision 1.2
  retrieving revision 1.3
  diff -u -r1.2 -r1.3
  --- out_bbs_basic.pm	31 Mar 2003 01:50:51 -0000	1.2
  +++ out_bbs_basic.pm	24 Apr 2003 04:29:06 -0000	1.3
  @@ -45,6 +45,8 @@
           my $ok = $brigade->first->type->name =~ /mod_perl/ ? 4 : 0;
           $brigade->insert_tail(APR::Bucket->new("ok $ok\n"));
   
  +        $brigade->insert_tail(APR::Bucket::eos_create($ba));
  +
           $filter->next->pass_brigade($brigade);
   
           $filter->ctx(1); # flag that we have run this already
  
  
  

Mime
View raw message