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

Reply via email to