Login | Register For Free | Help
Search for: (Advanced)

Mailing List Archive: ModPerl: Embperl-cvs
cvs commit: embperl epinit.c
 

Index | Next | Previous | View Flat


richter at apache

Dec 20, 2002, 5:00 AM


Views: 109
Permalink
cvs commit: embperl epinit.c

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: embperl-cvs-unsubscribe [at] perl
For additional commands, e-mail: embperl-cvs-help [at] perl

Subject User Time
cvs commit: embperl epinit.c richter at apache Dec 20, 2002, 5:00 AM

  Index | Next | Previous | View Flat
 
 


Interested in having your list archived? Contact Gossamer Threads
 
  Web Applications & Managed Hosting Powered by Gossamer Threads Inc.