mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-06-09 10:58:14 +02:00
codetools: FindLineEndOrCodeInFrontOfPosition do not skip semicolon by default, bug #16123
git-svn-id: trunk@24236 -
This commit is contained in:
parent
7b938aafdc
commit
6bcc6465df
@ -2466,7 +2466,7 @@ begin
|
|||||||
LinkIndex:=Scanner.LinkIndexAtCleanPos(StartPos);
|
LinkIndex:=Scanner.LinkIndexAtCleanPos(StartPos);
|
||||||
LinkStart:=Scanner.Links[LinkIndex].CleanedPos;
|
LinkStart:=Scanner.Links[LinkIndex].CleanedPos;
|
||||||
Result:=BasicCodeTools.FindLineEndOrCodeInFrontOfPosition(Src,
|
Result:=BasicCodeTools.FindLineEndOrCodeInFrontOfPosition(Src,
|
||||||
StartPos,LinkStart,Scanner.NestedComments,StopAtDirectives);
|
StartPos,LinkStart,Scanner.NestedComments,StopAtDirectives,false);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCustomCodeTool.ClearIgnoreErrorAfter;
|
procedure TCustomCodeTool.ClearIgnoreErrorAfter;
|
||||||
|
Loading…
Reference in New Issue
Block a user