Minor: fix code indentation

This commit is contained in:
Ansgar Becker
2009-08-29 06:21:27 +00:00
parent a2ef629b81
commit 4dc6ec2423

View File

@ -6869,12 +6869,12 @@ begin
Databases.Clear;
DatabasesWanted := Explode(';', comboOnlyDBs.Text);
if DatabasesWanted.Count > 0 then begin
// Add wanted dbs by comparing strings
// Add wanted dbs by comparing strings
for i:=0 to AllDatabases.Count-1 do begin
if DatabasesWanted.IndexOf(AllDatabases[i]) > -1 then
Databases.Add(AllDatabases[i]);
end;
// Add dbs by regular expression, avoiding duplicates
// Add dbs by regular expression, avoiding duplicates
rx := TRegExpr.Create;
for i:=0 to DatabasesWanted.Count-1 do begin
rx.Expression := '^'+DatabasesWanted[i]+'$';