From 99f0636d87038237399b2052789916fbff55d9b1 Mon Sep 17 00:00:00 2001
From: Alexey <support@uvviewsoft.com>
Date: Mon, 8 May 2023 10:41:44 +0300
Subject: [PATCH] fix from https://github.com/Alexey-T/CudaText/issues/5054

---
 atsynedit_cmp/atsynedit_cmp_form.pas | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/atsynedit_cmp/atsynedit_cmp_form.pas b/atsynedit_cmp/atsynedit_cmp_form.pas
index fb752fe..235a6be 100644
--- a/atsynedit_cmp/atsynedit_cmp_form.pas
+++ b/atsynedit_cmp/atsynedit_cmp_form.pas
@@ -319,8 +319,13 @@ procedure TFormATSynEditComplete.FormClose(Sender: TObject;
   if FEdit.Visible and FEdit.Enabled and FEdit.CanFocus then
     FEdit.SetFocus;
 
-  //fix stopped caret blinking (could not find the real reason why blinking stops)
+  {
+  //fix stopped caret blinking (could not find the real reason why blinking stops),
+  //if pressing Esc with auto-completion opened
   FEdit.DoCommand(1{some not existing command}, cInvokeInternal);
+  }
+  //above commented block is not needed after the fix in CudaText #5054, FEdit.Update is enough
+  FEdit.Update;
 end;
 
 procedure TFormATSynEditComplete.FormDestroy(Sender: TObject);