From 8fa2a711477dbc81b96cf5e56285b850429eb9e3 Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.burg@gmx.com>
Date: Mon, 19 Jan 2015 06:26:48 +0100
Subject: [PATCH] fix, possible focus loss on doc switch

---
 src/ce_synmemo.pas | 7 ++-----
 1 file changed, 2 insertions(+), 5 deletions(-)

diff --git a/src/ce_synmemo.pas b/src/ce_synmemo.pas
index 2ad85591..4d03bfa4 100644
--- a/src/ce_synmemo.pas
+++ b/src/ce_synmemo.pas
@@ -363,10 +363,7 @@ end;
 procedure TCESynMemo.SetVisible(Value: Boolean);
 begin
   inherited;
-  if not Value then exit;
-  checkFileDate;
-  identifierToD2Syn;
-  subjDocFocused(TCEMultiDocSubject(fMultiDocSubject), self);
+  if Value then setFocus;
 end;
 
 procedure TCESynMemo.SetHighlighter(const Value: TSynCustomHighlighter);
@@ -408,7 +405,7 @@ begin
   loadCache;
   //
   fModified := false;
-  subjDocFocused(TCEMultiDocSubject(fMultiDocSubject), self);
+  setFocus;
   subjDocChanged(TCEMultiDocSubject(fMultiDocSubject), self);
 end;