dougm 01/04/17 15:01:20
Modified: . Changes
src/modules/perl mod_perl.c
Log:
back out 'stop win32 crash when bringing down service' change, no
longer needed with 1.3.19
Revision Changes Path
1.586 +4 -0 modperl/Changes
Index: Changes
===================================================================
RCS file: /home/cvs/modperl/Changes,v
retrieving revision 1.585
retrieving revision 1.586
diff -u -r1.585 -r1.586
--- Changes 2001/04/17 21:57:17 1.585
+++ Changes 2001/04/17 22:01:13 1.586
@@ -10,6 +10,10 @@
=item 1.25_01-dev
+back out 'stop win32 crash when bringing down service' change, no
+longer needed with 1.3.19
+[John Sterling, Will Rowe]
+
$r->no_cache(0) will unset cache headers
[Geoffrey Young <[EMAIL PROTECTED]>]
1.136 +0 -12 modperl/src/modules/perl/mod_perl.c
Index: mod_perl.c
===================================================================
RCS file: /home/cvs/modperl/src/modules/perl/mod_perl.c,v
retrieving revision 1.135
retrieving revision 1.136
diff -u -r1.135 -r1.136
--- mod_perl.c 2001/02/16 23:30:27 1.135
+++ mod_perl.c 2001/04/17 22:01:18 1.136
@@ -509,18 +509,6 @@
{
array_header *librefs;
-#ifdef WIN32
- // This is here to stop a crash when bringing down
- // a service. Apparently the dso is unloaded too early.
- // This if statement tests to see if we are running as a
- // service. apache does the same
- // see apache's isProcessService() in service.c
- if (AllocConsole()) {
- FreeConsole();
- return;
- }
-#endif
-
librefs = xs_dl_librefs((pool *)data);
perl_shutdown(NULL, NULL);
unload_xs_so(librefs);