From 426ce2bf0f1f8da18a0babe9c441479103ba4f1f Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.burg@gmx.com>
Date: Sat, 7 Feb 2015 01:14:27 +0100
Subject: [PATCH] fix, perf issue when selecting in huge files

---
 src/ce_editor.pas | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/src/ce_editor.pas b/src/ce_editor.pas
index bc952904..96da79bf 100644
--- a/src/ce_editor.pas
+++ b/src/ce_editor.pas
@@ -289,9 +289,7 @@ end;
 procedure TCEEditorWidget.memoMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
 begin
   if not (ssLeft in Shift) then exit;
-  //
   beginUpdateByDelay;
-  UpdateByEvent;
 end;
 
 procedure TCEEditorWidget.memoCtrlClick(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
@@ -356,6 +354,7 @@ var
   md: string;
 begin
   if fDoc = nil then exit;
+  UpdateByEvent;
   if not fKeyChanged then exit;
   //
   fKeyChanged := false;