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

SynEdit: Fix LFM fold (tree would not draw close node indicators)

Browse Source 
git-svn-id: trunk@22608 -
This commit is contained in:
martin 2009-11-15 22:38:34 +00:00
parent e3156cd675
commit 30616b6f50
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/synhighlighterlfm.pas
View File

@ -609,7 +609,7 @@ end;
function TSynLFMSyn.FoldCloseCount(ALineIndex: Integer; AType: Integer): integer; function TSynLFMSyn.FoldCloseCount(ALineIndex: Integer; AType: Integer): integer;
begin begin
Result := MinimumFoldLevel(ALineIndex) - EndFoldLevel(ALineIndex - 1); Result := EndFoldLevel(ALineIndex - 1) - MinimumFoldLevel(ALineIndex);
end; end;
function TSynLFMSyn.FoldNestCount(ALineIndex: Integer; AType: Integer): integer; function TSynLFMSyn.FoldNestCount(ALineIndex: Integer; AType: Integer): integer;