Original code:
Code: Select all
function TSynCustomHighlighter.IsIdentChar(AChar: WideChar): Boolean;
begin
case AChar of
'_', '0'..'9', 'A'..'Z', 'a'..'z':
Result := True;
else
Result := False;
end;
end;
My code to fix the bug with cyrillic symbols/words:
Code: Select all
function TSynCustomHighlighter.IsIdentChar(AChar: WideChar): Boolean;
begin
Result := (AChar >= #33) and not IsWordBreakChar(AChar)
end;
PS: Sorry for my bad english.