You are viewing a plain text version of this content. The canonical link for it is here.
Posted to modperl-cvs@perl.apache.org by st...@apache.org on 2004/06/13 18:31:52 UTC
cvs commit: modperl-2.0/t/filter in_init_basic.t
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");