ukamnya
/
Redmine-mod-perl-auth
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Removed leftover query_fetch_first.

1.x
Adirelle 2011-11-14 11:33:29 +01:00
parent adc4755e8b
commit 8cefc4e574
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Redmine.pm
View File

@ -373,9 +373,9 @@ sub check_login {
unless $CanUseLDAPAuth; unless $CanUseLDAPAuth;
# Get LDAP server informations # Get LDAP server informations
my($host, $port, $tls, $account, $account_password, $base_dn, $attr_login) = query_fetch_first( my($host, $port, $tls, $account, $account_password, $base_dn, $attr_login) = $dbh->selectrow_array(
$dbh,
"SELECT host,port,tls,account,account_password,base_dn,attr_login from auth_sources WHERE id = ?", "SELECT host,port,tls,account,account_password,base_dn,attr_login from auth_sources WHERE id = ?",
undef,
$auth_source_id $auth_source_id
); );