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

SynEdit: re-enable markup in lfm

Browse Source 
git-svn-id: trunk@52180 -
This commit is contained in:
martin 2016-04-12 23:01:29 +00:00
parent 77a7561f6e
commit 8b3aed5ba5
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
components/synedit/synhighlighterlfm.pas
View File

@ -262,8 +262,10 @@ function TSynLFMSyn.GetFoldConfigInstance(Index: Integer): TSynCustomFoldConfig;
begin begin
Result := inherited GetFoldConfigInstance(Index); Result := inherited GetFoldConfigInstance(Index);
Result.Enabled := True; Result.Enabled := True;
Result.SupportedModes := [fmFold, fmMarkup, fmOutline]; if TLfmCodeFoldBlockType(Index) in [cfbtLfmObject, cfbtLfmList, cfbtLfmItem] then begin
Result.Modes := [fmFold, fmMarkup, fmOutline]; Result.SupportedModes := Result.SupportedModes + [fmMarkup];
Result.Modes := Result.Modes + [fmMarkup];
end;
end; end;
constructor TSynLFMSyn.Create(AOwner: TComponent); constructor TSynLFMSyn.Create(AOwner: TComponent);