cvs commit: embperl epinit.c

[richter]

richter     2002/12/20 04:00:16

  Modified:    .        epinit.c
  Log:
  ignore everything after second : in session id in url
  
  Revision  Changes    Path
  1.5       +4 -1      embperl/epinit.c
  
  Index: epinit.c
  ===================================================================
  RCS file: /home/cvs/embperl/epinit.c,v
  retrieving revision 1.4
  retrieving revision 1.5
  diff -u -r1.4 -r1.5
  --- epinit.c  26 Nov 2002 10:03:41 -0000      1.4
  +++ epinit.c  20 Dec 2002 12:00:16 -0000      1.5
  @@ -1021,6 +1021,9 @@
                               char * p = strchr(pVal, ':') ;
                               if (p && *p)
                                   {
  +                                char * p2 = strchr(p, ':') ;
  +                                if (p2)
  +                                    *p2 = '\0' ;
                                   r -> sSessionUserID = ep_pstrdup (r -> pPool, p + 
1) ;
                                   *p = '\0' ;
                                   }
  
  
  

---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]