From b320caef175f181f6a0af55c813ca709a6cd5ef3 Mon Sep 17 00:00:00 2001
From: Ansgar Becker <ansgarbecker@users.noreply.github.com>
Date: Sun, 8 Nov 2009 16:17:12 +0000
Subject: [PATCH] Remove dead code

---
 source/main.pas | 10 ----------
 1 file changed, 10 deletions(-)

diff --git a/source/main.pas b/source/main.pas
index d7622867..eac441b9 100644
--- a/source/main.pas
+++ b/source/main.pas
@@ -716,8 +716,6 @@ type
     EditVariableForm           : TfrmEditVariable;
     FileNameSessionLog         : String;
     FileHandleSessionLog       : Textfile;
-    SqlMessages                : TWideStringList;
-    SqlMessagesLock            : TRtlCriticalSection;
     dsShowEngines,
     dsHaveEngines,
     dsCollations,
@@ -1065,9 +1063,6 @@ var
   filename : String;
 begin
   DoDisconnect;
-  EnterCriticalSection(SqlMessagesLock);
-  FreeAndNil(SqlMessages);
-  LeaveCriticalSection(SqlMessagesLock);
 
   OpenRegistry;
   // Position of Toolbars
@@ -1190,11 +1185,6 @@ begin
 
   CachedTableLists := TWideStringList.Create;
 
-  InitializeCriticalSection(SqlMessagesLock);
-  EnterCriticalSection(SqlMessagesLock);
-  SqlMessages := TWideStringList.Create;
-  LeaveCriticalSection(SqlMessagesLock);
-
   Delimiter := GetRegValue(REGNAME_DELIMITER, DEFAULT_DELIMITER);
 
   // Delphi work around to force usage of Vista's default font (other OSes will be unaffected)