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; end;
procedure TCESynMemo.setFocus; procedure TCESynMemo.setFocus;
var
saved: TSynCustomHighlighter;
begin begin
inherited; inherited;
checkFileDate; checkFileDate;
if (Highlighter <> nil) then //
begin saved := Highlighter;
LineTextChanged(nil, 0, Lines.Count); Highlighter := nil;
Highlighter.ScanRanges; Highlighter := saved;
Highlighter.ResetRange; //
end;
identifierToD2Syn; identifierToD2Syn;
subjDocFocused(TCEMultiDocSubject(fMultiDocSubject), self); subjDocFocused(TCEMultiDocSubject(fMultiDocSubject), self);
end; end;