Remove duplicated database names from user passed list. Fixes issue #2322.

This commit is contained in:
Ansgar Becker
2011-03-13 22:35:18 +00:00
parent 56595d6df6
commit 2a3466598b

View File

@@ -1180,6 +1180,8 @@ begin
FAllDatabases[i] := Trim(FAllDatabases[i]);
if FAllDatabases[i] = '' then
FAllDatabases.Delete(i);
if FAllDatabases.IndexOf(FAllDatabases[i]) <> i then
FAllDatabases.Delete(i);
end;
end else try
FAllDatabases := GetCol('SHOW DATABASES');