cvs commit: modperl-2.0/t/filter in_init_basic.t

[stas]

stas        2004/06/13 09:31:51

  Modified:    t/filter in_init_basic.t
  Log:
  adjust t_cmp arguments to make Test.pm happy
  Submitted by: Joe Schaefer
  
  Revision  Changes    Path
  1.5       +1 -1      modperl-2.0/t/filter/in_init_basic.t
  
  Index: in_init_basic.t
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/t/filter/in_init_basic.t,v
  retrieving revision 1.4
  retrieving revision 1.5
  diff -u -u -r1.4 -r1.5
  --- in_init_basic.t   6 Aug 2003 07:06:23 -0000       1.4
  +++ in_init_basic.t   13 Jun 2004 16:31:51 -0000      1.5
  @@ -13,4 +13,4 @@
   
   my $location = '/TestFilter__in_init_basic';
   my $response = POST_BODY $location, content => $content;
  -ok t_cmp(qr/$expected/, qr/$response/, "test filter init functionality");
  +ok t_cmp($response, qr/$expected/, "test filter init functionality");