Permalink
Browse files

Query limitations in privileges can live in the very first GRANT, so …

…don't reset these when the second one doesn't contain these. Closes #305.
  • Loading branch information...
ansgarbecker committed Nov 26, 2018
1 parent 2da1c6b commit 78788641d187572b59a943840548b27861f80f79
Showing with 0 additions and 4 deletions.
  1. +0 −4 source/usermanager.pas
@@ -688,10 +688,6 @@ procedure TUserManagerForm.listUsersFocusChanged(Sender: TBaseVirtualTree; Node:
rxTemp.Expression := '\sWITH\s+(.+)';
if rxTemp.Exec(rxGrant.Match[11]) then begin
WithClause := rxTemp.Match[1];
User.MaxQueries := 0;
User.MaxUpdates := 0;
User.MaxConnections := 0;
User.MaxUserConnections := 0;
if ExecRegExpr('\bGRANT\s+OPTION\b', WithClause) then
P.OrgPrivs.Add('GRANT');
rxTemp.Expression := '\bMAX_QUERIES_PER_HOUR\s+(\d+)\b';

0 comments on commit 7878864

Please sign in to comment.