fix from Alexey-T/CudaText#5054

Alexey-T · May 8, 2023 · 99f0636 · 99f0636
1 parent 719320c
commit 99f0636
Showing 1 changed file with 6 additions and 1 deletion.
diff --git 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);