From d01c4c6496cd072c27dd1a2f9c310ac4810914a1 Mon Sep 17 00:00:00 2001 From: juha Date: Sun, 21 Feb 2021 15:34:09 +0000 Subject: [PATCH] SynEdit: Fix compilation with FPC 3.0.4. git-svn-id: trunk@64645 - --- components/synedit/syneditautocomplete.pp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/components/synedit/syneditautocomplete.pp b/components/synedit/syneditautocomplete.pp index 4764dedc2e..62003614be 100644 --- a/components/synedit/syneditautocomplete.pp +++ b/components/synedit/syneditautocomplete.pp @@ -424,7 +424,7 @@ var StartI := Length(CodeTemplateAttributesStartMagic) + 1; while (StartI <= Length(sComplValue)) and (sComplValue[StartI] in [#10,#13]) do Inc(StartI); - EndI := Pos(CodeTemplateAttributesEndMagic, sComplValue, StartI); + EndI := PosEx(CodeTemplateAttributesEndMagic, sComplValue, StartI); if EndI = 0 then raise Exception.Create('TCustomSynAutoComplete.ParseCompletionList: "' + CodeTemplateAttributesEndMagic + '" not found.');