opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2026-03-13 09:24:25 +08:00
Code Issues Packages Projects Releases Wiki Activity

Bugfix: removing a privilege did not work for the special case where UPDATE ... ON DUPE KEY instead of INSERT has to be used (for the server-level privileges jumbled together with lots of irrelevant stuff we don't want to touch in mysql.user).

Browse Source
This commit is contained in:
rosenfield.albert
2008-06-23 17:06:06 +00:00
parent 777061c1ac
commit ea352df61d
1 changed files with 6 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
source/usermanager.pas
View File

@@ -863,6 +863,7 @@ end;
procedure TUserManagerForm.btnOKClick(Sender: TObject);
var
i, j, k: Integer;
c: Char;
u: TUser;
p: TPrivilege;
sql, TableName, SetFieldName: String;
@@ -1123,13 +1124,14 @@ begin
PrivUpdates.Clear;
PrivValues.Clear;
// Assemble values of new privilege definition.
for k := 0 to p.SelectedPrivNames.Count - 1 do begin
if TableSet.FindField(p.SelectedPrivNames[k] + '_priv') <> nil then begin
for k := 0 to p.PrivNames.Count - 1 do begin
if p.SelectedPrivNames.IndexOf(p.PrivNames[k]) > -1 then c := 'Y' else c := 'N';
if TableSet.FindField(p.PrivNames[k] + '_priv') <> nil then begin
// There's an ENUM field matching the privilege name.
PrivUpdates.Add(mask(p.SelectedPrivNames[k] + '_priv') + '=' + esc('Y'));
PrivUpdates.Add(mask(p.PrivNames[k] + '_priv') + '=' + esc(c));
end else
// It must be part of a SET field, then.
PrivValues.Add(p.SelectedPrivNames[k]);
if c = 'Y' then PrivValues.Add(p.PrivNames[k]);
end;
// Insert new privilege definition.
sql := 'INSERT INTO ' + db + '.' + TableName;