Return-Path: 
 <modperl-cvs-return-2343-apmail-modperl-cvs-archive=apache.org@apache.org>
Delivered-To: apmail-modperl-cvs-archive@apache.org
Received: (qmail 28449 invoked by uid 500); 10 May 2002 01:41:39 -0000
Mailing-List: contact modperl-cvs-help@perl.apache.org; run by ezmlm
Precedence: bulk
list-help: <mailto:modperl-cvs-help@apache.org>
list-unsubscribe: <mailto:modperl-cvs-unsubscribe@apache.org>
list-post: <mailto:modperl-cvs@perl.apache.org>
Reply-To: dev@perl.apache.org
Delivered-To: mailing list modperl-cvs@apache.org
Received: (qmail 28434 invoked by uid 500); 10 May 2002 01:41:38 -0000
Delivered-To: apmail-modperl-2.0-cvs@apache.org
Date: 10 May 2002 01:41:37 -0000
Message-ID: <20020510014137.36512.qmail@icarus.apache.org>
From: dougm@apache.org
To: modperl-2.0-cvs@apache.org
Subject: cvs commit: modperl-2.0/lib/Apache compat.pm
X-Spam-Rating: daedalus.apache.org 1.6.2 0/1000/N

dougm       02/05/09 18:41:37

  Modified:    lib/Apache compat.pm
  Log:
  alias Apache::URI::parse to APR::URI::parse in Apache::compat
  
  Revision  Changes    Path
  1.38      +3 -0      modperl-2.0/lib/Apache/compat.pm
  
  Index: compat.pm
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/lib/Apache/compat.pm,v
  retrieving revision 1.37
  retrieving revision 1.38
  diff -u -r1.37 -r1.38
  --- compat.pm	7 Apr 2002 21:39:59 -0000	1.37
  +++ compat.pm	10 May 2002 01:41:37 -0000	1.38
  @@ -28,6 +28,7 @@
   use Apache::Log ();
   use APR::Table ();
   use APR::Pool ();
  +use APR::URI ();
   use mod_perl ();
   use Symbol ();
   
  @@ -380,6 +381,8 @@
   
       return $size;
   }
  +
  +*Apache::URI::parse = \&APR::URI::parse;
   
   1;
   __END__