From 8a9ee73349fdebb4138af3f5f5395fd07b2cfdc0 Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.b@gmx.com>
Date: Sun, 31 Oct 2021 02:01:51 +0200
Subject: [PATCH] fix, option _textCompletionMinLength_ min length off-by-one.

---
 CHANGELOG.md      | 4 ++++
 src/u_synmemo.pas | 2 +-
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/CHANGELOG.md b/CHANGELOG.md
index bac95bb0..8da9d8d7 100644
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -1,3 +1,7 @@
+# v3.9.16-dev
+
+- editor, option _textCompletionMinLength_ min length off-by-one.
+
 # v3.9.15
 
 ## Bugs fixed
diff --git a/src/u_synmemo.pas b/src/u_synmemo.pas
index 6bf99e08..d6da536f 100644
--- a/src/u_synmemo.pas
+++ b/src/u_synmemo.pas
@@ -2919,7 +2919,7 @@ begin
       while not r.empty do
       begin
         w := r.popUntil(c)^.takeWhile(c).yield;
-        if (w.length > fTextCompletionMinLength) and not h.contains(w) then
+        if (w.length >= fTextCompletionMinLength) and not h.contains(w) then
         begin
           h.insert(w);
           fCompletion.ItemList.AddObject(w, TObject(PtrUint(dckText)));