From 685c6dbe813e0895bed4ad026120c4d67779d2ef Mon Sep 17 00:00:00 2001
From: "rosenfield.albert"
 <rosenfield.albert@40cadd2d-89a2-4482-8f20-0232d845d7e3>
Date: Thu, 14 Aug 2008 21:39:08 +0000
Subject: [PATCH] Bugfix: if a table selected in the tree were removed, and the
 tree then refreshed, the tree would disappear "forever" due to an unpaired
 BeginUpdate (no EndUpdate due to exception).

---
 source/childwin.pas | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/source/childwin.pas b/source/childwin.pas
index 67638f07..075d3122 100644
--- a/source/childwin.pas
+++ b/source/childwin.pas
@@ -5330,8 +5330,10 @@ begin
   ExpandedDBs.Free;
   TablesFetched.Free;
 
-  if oldSelectedTable <> '' then
-    SelectedTable := oldSelectedTable;
+  try
+    if oldSelectedTable <> '' then SelectedTable := oldSelectedTable;
+  except
+  end;
   DBTree.EndUpdate;
 end;