From 8af9aeccdb886fb12a40af60672c3504934cb9ca Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.b@gmx.com>
Date: Fri, 17 Sep 2021 23:39:47 +0200
Subject: [PATCH] exclude current line from text completions

---
 src/u_synmemo.pas | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/u_synmemo.pas b/src/u_synmemo.pas
index b5e162e2..3edd353a 100644
--- a/src/u_synmemo.pas
+++ b/src/u_synmemo.pas
@@ -2915,6 +2915,8 @@ begin
     h := TStringHashSet.create();
     for i := 0 to lines.Count-1 do
     begin
+      if i.equals(CaretY - 1) then
+        continue;
       r := TStringRange.create(lines[i]);
       while not r.empty do
       begin