cvs commit: modperl-2.0/t/filter/TestFilter out_str_req_mix.pm

[stas]

stas        2003/04/02 22:50:38

  Modified:    t/filter out_str_req_mix.t
               t/filter/TestFilter out_str_req_mix.pm
  Log:
  cleanup
  
  Revision  Changes    Path
  1.2       +0 -2      modperl-2.0/t/filter/out_str_req_mix.t
  
  Index: out_str_req_mix.t
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/t/filter/out_str_req_mix.t,v
  retrieving revision 1.1
  retrieving revision 1.2
  diff -u -r1.1 -r1.2
  --- out_str_req_mix.t 3 Apr 2003 06:23:53 -0000       1.1
  +++ out_str_req_mix.t 3 Apr 2003 06:50:37 -0000       1.2
  @@ -11,8 +11,6 @@
   
   my $content = '<!--#include virtual="/includes/REMOVEclear.shtml" -->';
   
  -my $body   = 'This is a clear text';
  -
   my $expected = 'This is a clear text';
   my $received = POST_BODY $location, content => $content;
   
  
  
  
  1.2       +1 -1      modperl-2.0/t/filter/TestFilter/out_str_req_mix.pm
  
  Index: out_str_req_mix.pm
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/t/filter/TestFilter/out_str_req_mix.pm,v
  retrieving revision 1.1
  retrieving revision 1.2
  diff -u -r1.1 -r1.2
  --- out_str_req_mix.pm        3 Apr 2003 06:23:53 -0000       1.1
  +++ out_str_req_mix.pm        3 Apr 2003 06:50:38 -0000       1.2
  @@ -43,7 +43,7 @@
   sub adjust {
       my $filter = shift;
   
  -    warn "add_prefix called\n";
  +    #warn "add_prefix called\n";
   
       while ($filter->read(my $buffer, 1024)){
           $buffer =~ s/REMOVE//;