diff options
Diffstat (limited to 'checksetup.pl')
-rwxr-xr-x | checksetup.pl | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/checksetup.pl b/checksetup.pl index cd991d561..42582fa65 100755 --- a/checksetup.pl +++ b/checksetup.pl @@ -4155,7 +4155,7 @@ if ($sth->rows == 0) { } } $sth = $dbh->prepare("SELECT login_name FROM profiles " . - "WHERE login_name = ?"); + "WHERE " . $dbh->sql_istrcmp('login_name', '?')); $sth->execute($login); if ($sth->rows > 0) { print "$login already has an account.\n"; @@ -4258,9 +4258,10 @@ if ($sth->rows == 0) { } # Put the admin in each group if not already - my $userid = $dbh->selectrow_array( - "SELECT userid FROM profiles WHERE login_name = ?", undef, $login); - + my $userid = $dbh->selectrow_array("SELECT userid FROM profiles WHERE " . + $dbh->sql_istrcmp('login_name', '?'), + undef, $login); + # Admins get explicit membership and bless capability for the admin group my ($admingroupid) = $dbh->selectrow_array("SELECT id FROM groups WHERE name = 'admin'"); |