From 0b4013a8fe85df04fd4be9243dbe58fd11d57d84 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Tue, 19 Dec 2023 10:38:35 +0100
Subject: [PATCH] ide: fixed delting EndOfTokenChars at end of code template,
 fixed #40498

---
 ide/codemacroprompt.pas | 12 ------------
 1 file changed, 12 deletions(-)

diff --git a/ide/codemacroprompt.pas b/ide/codemacroprompt.pas
index 640bd0f0d5..99d9f8a1bd 100644
--- a/ide/codemacroprompt.pas
+++ b/ide/codemacroprompt.pas
@@ -534,18 +534,6 @@ begin
       // p must be logical, until template text is inserted
     end;
 
-    // delete double end separator (e.g. avoid creating two semicolons 'begin end;;')
-    if (AEditor.BlockEnd.Y>0) and (AEditor.BlockEnd.Y<=AEditor.Lines.Count)
-    then begin
-      LineText:=AEditor.Lines[AEditor.BlockEnd.Y-1];
-      if AEditor.BlockEnd.X <= length(LineText) then
-        i := pos(LineText[AEditor.BlockEnd.X], EndOfTokenChr)
-      else
-        i := -1;
-      if i > 0 then
-        Parser.TrimEOTChar(EndOfTokenChr[i]);
-    end;
-
     if Parser.EditCellList.Count > 0 then
       i := AEditor.PluginCount - 1
     else