dougm 01/06/18 19:38:55
Modified: src/modules/perl mod_perl.c
Log:
removing dead code
Revision Changes Path
1.139 +0 -23 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.138
retrieving revision 1.139
diff -u -r1.138 -r1.139
--- mod_perl.c 2001/06/19 02:36:38 1.138
+++ mod_perl.c 2001/06/19 02:38:54 1.139
@@ -480,29 +480,6 @@
}
}
-#if 0
-/* unload_xs_dso should obsolete this hack */
-static void cancel_dso_dlclose(void)
-{
- module *modp;
-
- if(!PERL_DSO_UNLOAD)
- return;
-
- if(strEQ(top_module->name, "mod_perl.c"))
- return;
-
- for(modp = top_module; modp; modp = modp->next) {
- if(modp->dynamic_load_handle) {
- MP_TRACE_g(fprintf(stderr,
- "mod_perl: cancel dlclose for %s\n",
- modp->name));
- modp->dynamic_load_handle = NULL;
- }
- }
-}
-#endif
-
static void mp_dso_unload(void *data)
{
array_header *librefs;