perl-modperl-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From do...@apache.org
Subject cvs commit: modperl/src/modules/perl URI.xs
Date Sun, 09 Sep 2001 18:48:47 GMT
dougm       01/09/09 11:48:47

  Modified:    .        Changes
               src/modules/perl URI.xs
  Log:
  fix potential segv in Apache::URI->rpath
  Submitted by:	Vyacheslav Zamyatin <slawa@w-m.ru>
  Reviewed by:	dougm
  
  Revision  Changes    Path
  1.621     +3 -0      modperl/Changes
  
  Index: Changes
  ===================================================================
  RCS file: /home/cvs/modperl/Changes,v
  retrieving revision 1.620
  retrieving revision 1.621
  diff -u -r1.620 -r1.621
  --- Changes	2001/08/26 18:29:55	1.620
  +++ Changes	2001/09/09 18:48:47	1.621
  @@ -10,6 +10,9 @@
   
   =item 1.26_01-dev
   
  +fix potential segv in Apache::URI->rpath
  +[Vyacheslav Zamyatin <slawa@w-m.ru>]
  +
   require URI::URL to work with newer libwww-perl
   
   allow overriding of container directive handlers using the func parameter
  
  
  
  1.7       +5 -2      modperl/src/modules/perl/URI.xs
  
  Index: URI.xs
  ===================================================================
  RCS file: /home/cvs/modperl/src/modules/perl/URI.xs,v
  retrieving revision 1.6
  retrieving revision 1.7
  diff -u -r1.6 -r1.7
  --- URI.xs	2000/04/10 14:07:07	1.6
  +++ URI.xs	2001/09/09 18:48:47	1.7
  @@ -91,8 +91,11 @@
   	if(set > 0)
   	    RETVAL = newSVpv(uri->uri.path, set);
       } 
  -    else
  -        RETVAL = newSVpv(uri->uri.path, 0);
  +    else {
  +        if (uri->uri.path) {
  +            RETVAL = newSVpv(uri->uri.path, 0);
  +        }
  +    }
   
       OUTPUT:
       RETVAL 
  
  
  

Mime
View raw message