From d2acf5f8b87a14b08cd0041995a8be7d5a878056 Mon Sep 17 00:00:00 2001 From: maxim Date: Thu, 10 Jun 2021 22:31:48 +0000 Subject: [PATCH] CodeTools: fixed typo in TryFirstLocalIdentOccurence function name git-svn-id: trunk@65209 - --- components/codetools/codecompletiontool.pas | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/components/codetools/codecompletiontool.pas b/components/codetools/codecompletiontool.pas index 869f73b54d..6e851aaed4 100644 --- a/components/codetools/codecompletiontool.pas +++ b/components/codetools/codecompletiontool.pas @@ -9416,7 +9416,7 @@ function TCodeCompletionCodeTool.CompleteCode(CursorPos: TCodeXYPosition; end; end; - function TryFirstLocalIdentOccurence(CursorNode: TCodeTreeNode; + function TryFirstLocalIdentOccurrence(CursorNode: TCodeTreeNode; OrigCleanCursorPos, CleanCursorPos: Integer): boolean; var AtomContextNode, StatementNode: TCodeTreeNode; @@ -9475,7 +9475,7 @@ function TCodeCompletionCodeTool.CompleteCode(CursorPos: TCodeXYPosition; FCompletingCursorNode:=CursorNode; try if not CleanPosToCodePos(OrigCleanCursorPos,OldCodePos) then - RaiseException(20170421201838,'TCodeCompletionCodeTool.TryFirstLocalIdentOccurence CleanPosToCodePos'); + RaiseException(20170421201838,'TCodeCompletionCodeTool.TryFirstLocalIdentOccurrence CleanPosToCodePos'); CompleteCode:=TryCompleteLocalVar(LastCurPos.StartPos,AtomContextNode); AdjustCursor(OldCodePos,OldTopLine,NewPos,NewTopLine); exit(true); @@ -9593,7 +9593,7 @@ begin { Find the first occurrence of the (local) identifier at cursor in current procedure body and try again. } - if TryFirstLocalIdentOccurence(CursorNode,OrigCleanCursorPos,CleanCursorPos) then + if TryFirstLocalIdentOccurrence(CursorNode,OrigCleanCursorPos,CleanCursorPos) then exit(true); except on E: ECodeToolError do