diff --git a/components/synedit/synhighlighterpas.pp b/components/synedit/synhighlighterpas.pp index a44cf10290..85bd3c4db9 100644 --- a/components/synedit/synhighlighterpas.pp +++ b/components/synedit/synhighlighterpas.pp @@ -2345,7 +2345,7 @@ function TSynPasSyn.GetWordTriplet(LogicalCaret: TPoint; Lines: TSynEditStrings; end else begin MinLvl := 0; end; - until Result = c; + until Result >= c; Result := -1; end;