Bug 441592: DB connections not closing under mod_perl

Patch By Max Kanat-Alexander <mkanat@bugzilla.org> r=dkl, a=mkanat

diff --git a/mod_perl.pl b/mod_perl.pl
index bd6ef1002e6f1e95aca4bf0827e85f148588acde..e7067f385354e76dee5a21ad1931a1f1f6867793 100644 (file)
--- a/mod_perl.pl
+++ b/mod_perl.pl
@@ -100,10 +100,12 @@ sub handler : method {
 package Bugzilla::ModPerl::CleanupHandler;
 use strict;
 use Apache2::Const -compile => qw(OK);
+use Bugzilla;
 
 sub handler {
     my $r = shift;
 
+    Bugzilla::_cleanup();
     # Sometimes mod_perl doesn't properly call DESTROY on all
     # the objects in pnotes()
     foreach my $key (keys %{$r->pnotes}) {