From 1b65a44cfc1ecfb14d004586fa5fffee7d723f2e 2010-01-10 10:17:27
From: Jean-Philippe Lang <jp_lang@yahoo.fr>
Date: 2010-01-10 10:17:27
Subject: [PATCH] Fixes Redmine.pm error "closing dbh with active statement handles at /usr/lib/perl5/Apache/Redmine.pm" (#4205).

git-svn-id: svn+ssh://rubyforge.org/var/svn/redmine/trunk@3300 e93f8b46-1217-0410-a6f0-8f06a7374b81

---

diff --git a/extra/svn/Redmine.pm b/extra/svn/Redmine.pm
index 1829d2b..1b3b091 100644
--- a/extra/svn/Redmine.pm
+++ b/extra/svn/Redmine.pm
@@ -244,7 +244,9 @@ sub is_public_project {
     	}
     }
     $sth->finish();
+    undef $sth;
     $dbh->disconnect();
+    undef $dbh;
 
     $ret;
 }
@@ -310,10 +312,13 @@ sub is_member {
             $ret = 1 if ($ldap->authenticate($redmine_user, $redmine_pass));
           }
           $sthldap->finish();
+          undef $sthldap;
       }
   }
   $sth->finish();
+  undef $sth;
   $dbh->disconnect();
+  undef $dbh;
 
   if ($cfg->{RedmineCacheCredsMax} and $ret) {
     if (defined $usrprojpass) {