From 799d3a721fcbb0fe973d2eca4e113cdd738876cd Mon Sep 17 00:00:00 2001 From: martin Date: Sun, 25 Jan 2009 16:00:54 +0000 Subject: [PATCH] Synedit, reduced amount of ranges used by highlighter (fixed for last rev) git-svn-id: trunk@18444 - --- components/synedit/synhighlighterpas.pp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/components/synedit/synhighlighterpas.pp b/components/synedit/synhighlighterpas.pp index 226c5f5657..aa2716a017 100644 --- a/components/synedit/synhighlighterpas.pp +++ b/components/synedit/synhighlighterpas.pp @@ -881,7 +881,7 @@ function TSynPasSyn.Func37: TtkTokenKind; begin if KeyComp('Begin') then begin // if we are in an include file, we may not know the state - if (fRange * [rsImplementation, rsInterface] = []) then begin + if (fRange * [rsImplementation, rsInterface] = []) then Include(fRange, rsImplementation); TSynPasSynRange(CodeFoldRange).BracketNestLevel := 0; // Reset in case of partial code if TopPascalCodeFoldBlockType=cfbtVarType then EndCodeFoldBlockLastLine;