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_str_eval.pm
Date Thu, 24 Jun 2004 17:35:00 GMT
stas        2004/06/24 10:35:00

  Modified:    t/filter/TestFilter out_str_eval.pm
  Log:
  make the test fail again (a recent change in t_cmp implementation hid the
  problem, now implement the trigger to invoke filters explicitly)
  
  Revision  Changes    Path
  1.2       +3 -0      modperl-2.0/t/filter/TestFilter/out_str_eval.pm
  
  Index: out_str_eval.pm
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/t/filter/TestFilter/out_str_eval.pm,v
  retrieving revision 1.1
  retrieving revision 1.2
  diff -u -u -r1.1 -r1.2
  --- out_str_eval.pm	5 Jun 2004 05:05:21 -0000	1.1
  +++ out_str_eval.pm	24 Jun 2004 17:35:00 -0000	1.2
  @@ -29,6 +29,9 @@
       # XXX: see if we can fix filter handlers to restore the original
       # $@ when the callback completes
       eval { i_do_not_exist_really_i_do_not() };
  +    # trigger the filter invocation, before using $@
  +    $r->print("# whatever");
  +    $r->rflush;
       ok t_cmp(qr/Undefined subroutine/, $@, "some croak");
   
       return Apache::OK;
  
  
  

Mime
View raw message