From 6bcc6465dfbf221e1cfeb557462dda06b566a4cb Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Sat, 27 Mar 2010 08:08:54 +0000
Subject: [PATCH] codetools: FindLineEndOrCodeInFrontOfPosition do not skip
 semicolon by default, bug #16123

git-svn-id: trunk@24236 -
---
 components/codetools/customcodetool.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/components/codetools/customcodetool.pas b/components/codetools/customcodetool.pas
index ebfaa3221e..63e20bd26c 100644
--- a/components/codetools/customcodetool.pas
+++ b/components/codetools/customcodetool.pas
@@ -2466,7 +2466,7 @@ begin
   LinkIndex:=Scanner.LinkIndexAtCleanPos(StartPos);
   LinkStart:=Scanner.Links[LinkIndex].CleanedPos;
   Result:=BasicCodeTools.FindLineEndOrCodeInFrontOfPosition(Src,
-                    StartPos,LinkStart,Scanner.NestedComments,StopAtDirectives);
+              StartPos,LinkStart,Scanner.NestedComments,StopAtDirectives,false);
 end;
 
 procedure TCustomCodeTool.ClearIgnoreErrorAfter;