dougm       00/05/23 11:15:47

  Modified:    .        Changes
               src/modules/perl Apache.xs
  Log:
  fix unescape_url_info() when url is undef or ""
  
  Revision  Changes    Path
  1.490     +3 -0      modperl/Changes
  
  Index: Changes
  ===================================================================
  RCS file: /home/cvs/modperl/Changes,v
  retrieving revision 1.489
  retrieving revision 1.490
  diff -u -r1.489 -r1.490
  --- Changes   2000/05/23 15:56:04     1.489
  +++ Changes   2000/05/23 18:15:45     1.490
  @@ -10,6 +10,9 @@
   
   =item 1.24_01-dev
   
  +fix unescape_url_info() when url is undef or "",
  +thanks to Kenneth Lee for the spot
  +
   fix 1.24's Apache::Table->unset changes for win32
   [Randy Kobes <[EMAIL PROTECTED]>]
   
  
  
  
  1.97      +4 -0      modperl/src/modules/perl/Apache.xs
  
  Index: Apache.xs
  ===================================================================
  RCS file: /home/cvs/modperl/src/modules/perl/Apache.xs,v
  retrieving revision 1.96
  retrieving revision 1.97
  diff -u -r1.96 -r1.97
  --- Apache.xs 2000/04/21 06:03:52     1.96
  +++ Apache.xs 2000/05/23 18:15:46     1.97
  @@ -669,6 +669,10 @@
       register char * trans = url ;
       char digit ;
   
  +    if (!url || !*url) {
  +        XSRETURN_UNDEF;
  +    }
  +
       RETVAL = url;
   
       while (*url != '\0') {
  
  
  

Reply via email to