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
This commit is contained in:
parent
23508f4f98
commit
1b65a44cfc
@ -244,7 +244,9 @@ sub is_public_project {
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
$sth->finish();
|
$sth->finish();
|
||||||
|
undef $sth;
|
||||||
$dbh->disconnect();
|
$dbh->disconnect();
|
||||||
|
undef $dbh;
|
||||||
|
|
||||||
$ret;
|
$ret;
|
||||||
}
|
}
|
||||||
@ -310,10 +312,13 @@ sub is_member {
|
|||||||
$ret = 1 if ($ldap->authenticate($redmine_user, $redmine_pass));
|
$ret = 1 if ($ldap->authenticate($redmine_user, $redmine_pass));
|
||||||
}
|
}
|
||||||
$sthldap->finish();
|
$sthldap->finish();
|
||||||
|
undef $sthldap;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
$sth->finish();
|
$sth->finish();
|
||||||
|
undef $sth;
|
||||||
$dbh->disconnect();
|
$dbh->disconnect();
|
||||||
|
undef $dbh;
|
||||||
|
|
||||||
if ($cfg->{RedmineCacheCredsMax} and $ret) {
|
if ($cfg->{RedmineCacheCredsMax} and $ret) {
|
||||||
if (defined $usrprojpass) {
|
if (defined $usrprojpass) {
|
||||||
|
Loading…
x
Reference in New Issue
Block a user