From f18cf130971408be7f383f23e6570c65f5f83cfc Mon Sep 17 00:00:00 2001
From: rosenfield <rosenfield@40cadd2d-89a2-4482-8f20-0232d845d7e3>
Date: Fri, 27 Jul 2007 14:36:16 +0000
Subject: [PATCH] Bugfix: EnsureActiveDatabase() is a helper function, it
 shouldn't gobble up exceptions.

(There we go with that default "HandleErrors = true" thing again...)
---
 source/childwin.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/source/childwin.pas b/source/childwin.pas
index 0a0fadc7..98265c5e 100644
--- a/source/childwin.pas
+++ b/source/childwin.pas
@@ -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;