You are viewing a plain text version of this content. The canonical link for it is here.
Posted to modperl-cvs@perl.apache.org by do...@hyperreal.org on 1998/06/16 00:52:11 UTC
cvs commit: modperl/src/modules/perl perl_util.c
dougm 98/06/15 15:52:10
Modified: . Changes
src/modules/perl perl_util.c
Log:
bug fix so PATH_INFO is properly reset, thanks to David Sklar for the spot
Revision Changes Path
1.49 +4 -0 modperl/Changes
Index: Changes
===================================================================
RCS file: /export/home/cvs/modperl/Changes,v
retrieving revision 1.48
retrieving revision 1.49
diff -u -r1.48 -r1.49
--- Changes 1998/06/14 18:51:46 1.48
+++ Changes 1998/06/15 22:52:09 1.49
@@ -6,6 +6,10 @@
=over 3
+=item 1.12_01-dev
+
+bug fix so PATH_INFO is properly reset, thanks to David Sklar for the spot
+
=item 1.12 - June 14, 1998
added a long overdue CREDITS file
1.12 +1 -1 modperl/src/modules/perl/perl_util.c
Index: perl_util.c
===================================================================
RCS file: /export/home/cvs/modperl/src/modules/perl/perl_util.c,v
retrieving revision 1.11
retrieving revision 1.12
diff -u -r1.11 -r1.12
--- perl_util.c 1998/06/07 17:58:50 1.11
+++ perl_util.c 1998/06/15 22:52:10 1.12
@@ -462,7 +462,7 @@
continue;
else if((*key == 'T') && strnEQ(key, "TZ", 2))
continue;
- else if((*key == 'P') && strnEQ(key, "PATH", 4))
+ else if((*key == 'P') && strEQ(key, "PATH"))
continue;
(void)hv_delete(hv, key, klen, G_DISCARD);
}