stas 2004/05/27 21:44:39
Modified: t/response/TestAPR uri.pm Log: cleanup tweak Revision Changes Path 1.5 +0 -1 modperl-2.0/t/response/TestAPR/uri.pm Index: uri.pm =================================================================== RCS file: /home/cvs/modperl-2.0/t/response/TestAPR/uri.pm,v retrieving revision 1.4 retrieving revision 1.5 diff -u -u -r1.4 -r1.5 --- uri.pm 28 May 2004 04:07:17 -0000 1.4 +++ uri.pm 28 May 2004 04:44:39 -0000 1.5 @@ -144,7 +144,6 @@ # omit the query and fragment strings { - $parsed->query("my_query"); my $url_unparsed = $parsed->unparse( APR::URI_UNP_OMITQUERY|APR::URI_UNP_OMITPASSWORD); my $url2 = sprintf "%s://[EMAIL PROTECTED]", map { $url{$_}[1] }