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] }