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

SynEdit: fixed missing invalidation for foldconf markup

Browse Source 
git-svn-id: trunk@44055 -
This commit is contained in:
martin 2014-02-13 17:48:11 +00:00
parent e01e690857
commit 4a2a123175
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
components/synedit/synhighlighterpas.pp
View File

@ -3982,6 +3982,7 @@ begin
Result := inherited GetFoldConfigInstance(Index); Result := inherited GetFoldConfigInstance(Index);
Result.Enabled := TPascalCodeFoldBlockType(Index) in [cfbtBeginEnd..cfbtIfThen]; Result.Enabled := TPascalCodeFoldBlockType(Index) in [cfbtBeginEnd..cfbtIfThen];
m := [];
if TPascalCodeFoldBlockType(Index) in PascalWordTripletRanges then if TPascalCodeFoldBlockType(Index) in PascalWordTripletRanges then
m := [fmMarkup]; m := [fmMarkup];