fix, highlighter sharing, reset range when a doc get focused

some ranges were randomly broken
This commit is contained in:
Basile Burg 2015-06-18 09:50:08 +02:00
parent 45317a2565
commit 38a57fec33
1 changed files with 7 additions and 6 deletions

View File

@ -557,15 +557,16 @@ begin
end;
procedure TCESynMemo.setFocus;
var
saved: TSynCustomHighlighter;
begin
inherited;
checkFileDate;
if (Highlighter <> nil) then
begin
LineTextChanged(nil, 0, Lines.Count);
Highlighter.ScanRanges;
Highlighter.ResetRange;
end;
//
saved := Highlighter;
Highlighter := nil;
Highlighter := saved;
//
identifierToD2Syn;
subjDocFocused(TCEMultiDocSubject(fMultiDocSubject), self);
end;