reg fix, page caption not updated til focused

introduced in 87905802d1
This commit is contained in:
Basile Burg 2016-04-18 21:21:57 +02:00
parent c34df24089
commit af155404e0
1 changed files with 2 additions and 2 deletions

View File

@ -201,11 +201,11 @@ end;
procedure TCEEditorWidget.docFocused(aDoc: TCESynMemo);
begin
if aDoc = fDoc then exit;
fDoc := aDoc;
if fDoc.isNotNil and pageControl.currentPage.isNotNil and
(pageControl.currentPage.Caption = '<new document>') then
updatePageCaption;
if aDoc = fDoc then exit;
fDoc := aDoc;
focusedEditorChanged;
updateImperative;
end;