From cd19075e38261585c0e520336ac0b224c5b53d37 Mon Sep 17 00:00:00 2001 From: Basile Burg Date: Thu, 6 Jul 2023 21:45:37 +0200 Subject: [PATCH] remove obsolete patch --- patches/issue218.patch | 23 ----------------------- 1 file changed, 23 deletions(-) delete mode 100644 patches/issue218.patch diff --git a/patches/issue218.patch b/patches/issue218.patch deleted file mode 100644 index 6595ccc7..00000000 --- a/patches/issue218.patch +++ /dev/null @@ -1,23 +0,0 @@ -Fixes https://github.com/Basile-z/Coedit/issues/218 -Must be applied to any Lazarus 1.8.0 Vanilla. -Has not be applied to Lazarus 1.8.1 or newer. ---- synedit.pp -+++ synedit.pp -@@ -8945,7 +8945,7 @@ - while not Highlighter.GetEol do begin - Start := Highlighter.GetTokenPos + 1; - Token := Highlighter.GetToken; -+ if (PosX >= Start) and (PosX < Start + Length(Token)) then begin -- if (PosX >= Start) and (PosX <= Start + Length(Token)) then begin - Attri := Highlighter.GetTokenAttribute; - TokenType := Highlighter.GetTokenKind; - exit(True); -@@ -8990,7 +8990,7 @@ - //TokenType := Highlighter.GetTokenKind; - Attri := Highlighter.GetTokenAttribute; - //DebugLn([' TCustomSynEdit.CaretAtIdentOrString: Start=', Start, ', Token=', Token]); -+ if (PosX >= Start) and (PosX < Start + Length(Token)) then -- if (PosX >= Start) and (PosX <= Start + Length(Token)) then - begin - AtIdent := Attri = Highlighter.IdentifierAttribute; - NearString := (Attri = Highlighter.StringAttribute)