paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-20 10:39:09 +02:00
Code Issues Packages Projects Releases Wiki Activity

CodeTools: fixed typos related to 'occur' word

Browse Source 
git-svn-id: trunk@65193 -
This commit is contained in:
maxim 2021-06-10 22:07:39 +00:00
parent 12d2d6b4f7
commit 14a12ecb59
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/codetools/codecompletiontool.pas
View File

@ -9452,7 +9452,7 @@ function TCodeCompletionCodeTool.CompleteCode(CursorPos: TCodeXYPosition;
UpIdentifier := GetUpAtom; UpIdentifier := GetUpAtom;
//find first occurence of UpIdentifier from procedure begin until CleanCursorPos //find first occurrence of UpIdentifier from procedure begin until CleanCursorPos
//we are interested only in local variables/identifiers //we are interested only in local variables/identifiers
// --> the UpIdentifier must not be preceded by a point ("MyObject.I" - if we want to complete I) // --> the UpIdentifier must not be preceded by a point ("MyObject.I" - if we want to complete I)
// and then do another check if it is not available with the "with" command, e.g. // and then do another check if it is not available with the "with" command, e.g.
@ -9591,7 +9591,7 @@ begin
if TryComplete(CursorNode, CleanCursorPos) then if TryComplete(CursorNode, CleanCursorPos) then
exit(true); exit(true);
{ Find the first occurence of the (local) identifier at cursor in current { Find the first occurrence of the (local) identifier at cursor in current
procedure body and try again. } procedure body and try again. }
if TryFirstLocalIdentOccurence(CursorNode,OrigCleanCursorPos,CleanCursorPos) then if TryFirstLocalIdentOccurence(CursorNode,OrigCleanCursorPos,CleanCursorPos) then
exit(true); exit(true);