You are viewing a plain text version of this content. The canonical link for it is here.
Posted to embperl-cvs@perl.apache.org by ri...@apache.org on 2002/09/24 06:34:52 UTC

cvs commit: embperl Changes.pod epprovider.c

richter     2002/09/23 21:34:52

  Modified:    .        Tag: Embperl2c Changes.pod epprovider.c
  Log:
  fix memory leak
  
  Revision  Changes    Path
  No                   revision
  
  
  No                   revision
  
  
  1.129.4.93 +1 -0      embperl/Changes.pod
  
  Index: Changes.pod
  ===================================================================
  RCS file: /home/cvs/embperl/Changes.pod,v
  retrieving revision 1.129.4.92
  retrieving revision 1.129.4.93
  diff -u -r1.129.4.92 -r1.129.4.93
  --- Changes.pod	23 Sep 2002 13:31:04 -0000	1.129.4.92
  +++ Changes.pod	24 Sep 2002 04:34:52 -0000	1.129.4.93
  @@ -22,6 +22,7 @@
      - Fix problem when session id is given to Embperl, but session management
        was not setup
      - Added 'same' validation to check if two fileds have the same input enterd
  +   - Fix memory leak. Patch from Joshua Chamas.
   
   =head1 2.0b8  (BETA)  25. Juni 2002
   
  
  
  
  1.1.2.38  +2 -2      embperl/Attic/epprovider.c
  
  Index: epprovider.c
  ===================================================================
  RCS file: /home/cvs/embperl/Attic/epprovider.c,v
  retrieving revision 1.1.2.37
  retrieving revision 1.1.2.38
  diff -u -r1.1.2.37 -r1.1.2.38
  --- epprovider.c	1 Jul 2002 06:57:12 -0000	1.1.2.37
  +++ epprovider.c	24 Sep 2002 04:34:52 -0000	1.1.2.38
  @@ -388,7 +388,7 @@
       const char * sAbsFilename  ;
   
       sFilename = GetHashValueStr (aTHX_ pProviderParam, "filename",  r -> Component.Param.sInputfile) ;
  -    sAbsFilename = embperl_PathSearch(r, NULL, (char *)sFilename, -1) ;
  +    sAbsFilename = embperl_PathSearch(r, r -> pPool, (char *)sFilename, -1) ;
       if (!sAbsFilename)
           {
           strncpy (r -> errdat1, sFilename, sizeof (r -> errdat1) - 1) ;
  
  
  

---------------------------------------------------------------------
To unsubscribe, e-mail: embperl-cvs-unsubscribe@perl.apache.org
For additional commands, e-mail: embperl-cvs-help@perl.apache.org