clean shared synedit plugins

This commit is contained in:
Basile Burg 2015-03-31 04:44:16 +02:00
parent c9a3145ce1
commit f528343819
1 changed files with 4 additions and 2 deletions

View File

@ -296,10 +296,12 @@ end;
procedure TCEEditorWidget.focusedEditorChanged; procedure TCEEditorWidget.focusedEditorChanged;
begin begin
macRecorder.Clear;
fSyncEdit.Clear;
if fDoc = nil then exit; if fDoc = nil then exit;
// //
macRecorder.Editor := fDoc; macRecorder.Editor:= fDoc;
fSyncEdit.Editor := fDoc; fSyncEdit.Editor := fDoc;
completion.Editor := fDoc; completion.Editor := fDoc;
if (pageControl.ActivePage.Caption = '') then if (pageControl.ActivePage.Caption = '') then
begin begin