From f3c15fff0078df000a433693fb6a49e9f3bd484f Mon Sep 17 00:00:00 2001 From: Basile Burg Date: Fri, 11 Mar 2016 18:44:00 +0100 Subject: [PATCH] fixup for 8b880edddf69258721edd043ecc3d7c55be134e3 --- src/ce_editor.pas | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/src/ce_editor.pas b/src/ce_editor.pas index 357919d4..5b82353d 100644 --- a/src/ce_editor.pas +++ b/src/ce_editor.pas @@ -198,6 +198,8 @@ end; procedure TCEEditorWidget.docFocused(aDoc: TCESynMemo); begin + if pageControl.currentPage.Caption = '' then + updatePageCaption; if aDoc = fDoc then exit; fDoc := aDoc; focusedEditorChanged; @@ -206,7 +208,8 @@ end; procedure TCEEditorWidget.docChanged(aDoc: TCESynMemo); begin - if fDoc <> aDoc then exit; + if fDoc <> aDoc then + exit; fKeyChanged := true; beginDelayedUpdate; end;