actually - with recent changes to the apache core, that patch doesn't work
any more. we're working on a real fix - but in the mean time this one may
as well be removed.
sterling
_____________________________________________________________________________
Index: src/modules/perl/mod_perl.c
===================================================================
RCS file: /home/cvspublic/modperl/src/modules/perl/mod_perl.c,v
retrieving revision 1.135
diff -u -r1.135 mod_perl.c
--- src/modules/perl/mod_perl.c 2001/02/16 23:30:27 1.135
+++ src/modules/perl/mod_perl.c 2001/03/13 00:18:07
@@ -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);