anchor.diff:  uses
     Classes, SysUtils, FileUtil, ListFilterEdit, Forms, Controls, Graphics,
     ExtCtrls, Menus, ComCtrls, Buttons, lcltype, strutils, ce_widget,
  -  ce_common, ce_interfaces, ce_observer;
  +  ce_common, ce_interfaces, ce_observer, ce_writableComponent;
   
   type
  +
  +  TCEMiniExplorerOptions = class(TWritableLfmTextComponent)
  +  private
  +    fFavoriteFolders: TStringList;
  +    fSplitter1Position: integer;
  +    fSplitter2Position: integer;
  +    fLastFolder: string;
  +    procedure setFavoriteFolders(aValue: TStringList);
  +  published
  +    property splitter1Position: integer read fSplitter1Position write fSplitter1Position;
  +    property splitter2Position: integer read fSplitter2Position write fSplitter2Position;
  +    property lastFolder: string read fLastFolder write fLastFolder;
  +    property favoriteFolders: TStringList read fFavoriteFolders write setFavoriteFolders;
  +  public
  +    constructor create(aOwner: TComponent); override;
  +    destructor destroy; override;
  +    procedure assign(aValue: TPersistent); override;
  +    procedure assignTo(aValue: TPersistent); override;
  +  end;
  +
     TCEMiniExplorerWidget = class(TCEWidget)
       btnAddFav: TBitBtn;
       btnEdit: TBitBtn;
  
positive.code:   lstFilter.onChange := @lstFilterChange;
    //
    treeSetRoots;
  end;
  
  destructor TCEMiniExplorerWidget.destroy;
  begin
    fFavorites.Free;
    inherited;
  end;
  
negative.code:     fFavorites: TStringList;
      fLastFold: string;
      procedure lstFavDblClick(Sender: TObject);
      procedure updateFavorites;
      procedure treeSetRoots;
      procedure lstFilesFromTree;
  