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

Codetools: IdentifierCompletion, apply history limit to filtered list

Browse Source
This commit is contained in:
Martin 2023-07-21 20:51:39 +02:00
parent b9cdb23eed
commit b087b9f55e
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
components/codetools/identcompletiontool.pas
View File

@ -742,10 +742,13 @@ begin
( (FFoundHistoryItems[j].Compatibility = HistComp) or (not HasCompSort) ) and ( (FFoundHistoryItems[j].Compatibility = HistComp) or (not HasCompSort) ) and
(FFoundHistoryItems[j].Identifier <> '') (FFoundHistoryItems[j].Identifier <> '')
then begin then begin
CurItem := FFoundHistoryItems[j];
if (FilterCurItem >= 0) then begin
HistoryLimits[HistComp] := FFoundHistoryItems[j].HistoryIndex; HistoryLimits[HistComp] := FFoundHistoryItems[j].HistoryIndex;
dec(TotalHistLimit); dec(TotalHistLimit);
end; end;
end; end;
end;
if not HasCompSort then if not HasCompSort then
break; break;
end; end;