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

SynEdit: fix folded view, missing assign to result. (random gutter errors with wrapped text)

Browse Source
This commit is contained in:
Martin 2025-01-25 21:40:13 +01:00
parent 5eded0d07e
commit d121ba841e
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/synedit/syneditfoldedview.pp
View File

@ -863,7 +863,7 @@ end;
function TLazSynDisplayFold.ViewToTextIndex(AViewIndex: TLineIdx): TLineIdx; function TLazSynDisplayFold.ViewToTextIndex(AViewIndex: TLineIdx): TLineIdx;
begin begin
Result := FFoldView.InternViewToTextIndex(AViewIndex); Result := FFoldView.InternViewToTextIndex(AViewIndex);
inherited ViewToTextIndex(Result) Result := inherited ViewToTextIndex(Result)
end; end;
function TLazSynDisplayFold.ViewToTextIndexEx(AViewIndex: TLineIdx; out function TLazSynDisplayFold.ViewToTextIndexEx(AViewIndex: TLineIdx; out