anchor.diff:  begin
     inherited;
     fAutomatic := true;
  -  fCompletor := TSynEditAutoComplete.Create(self);
  +  fCompletor := TSynAutoComplete.Create(self);
     fMacros := TStringList.Create;
     fMacros.Delimiter := '=';
  +  assert(fCompletor.ShortCut <> 0);
     //
     fname := getDocPath + macFname;
     if fileExists(fname) then loadFromFile(fname);
  
positive.code: procedure TCEStaticEditorMacro.docNew(aDoc: TCESynMemo);
  begin
    fDoc := aDoc;
  end;
  
  procedure TCEStaticEditorMacro.docFocused(aDoc: TCESynMemo);
  begin
    fDoc := aDoc;
  end;
  
  procedure TCEStaticEditorMacro.docChanged(aDoc: TCESynMemo);
  
negative.code:   published
      // list of string with the format $<..>alnum=<..>
      property macros: TStringList read fMacros write setMacros;
      property automatic: boolean read fAutomatic write fAutomatic;
    public
      constructor create(aOwner: TComponent); override;
      destructor destroy; override;
  