Bugfix: EnsureActiveDatabase() is a helper function, it shouldn't gobble up exceptions.

(There we go with that default "HandleErrors = true" thing again...)
This commit is contained in:
rosenfield
2007-07-27 14:36:16 +00:00
parent 17fc590309
commit f18cf13097

View File

@ -1829,7 +1829,7 @@ begin
if ActualDatabase = '' then Exit;
if (FMysqlConn.Connection.Database <> ActualDatabase) or UserQueryFired then begin
FMysqlConn.Connection.Database := ActualDatabase;
ExecUseQuery(ActualDatabase);
ExecUseQuery(ActualDatabase, false, false);
UserQueryFired := false;
end;
end;