anchor.diff:      procedure ListboxOutKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
       procedure mnuEditClick(Sender: TObject);
       procedure mnuTabColorClick(Sender: TObject);
  +    procedure mnuTabPinnedClick(Sender: TObject);
       procedure mnuTabCopyDirClick(Sender: TObject);
       procedure mnuTabCopyFullPathClick(Sender: TObject);
       procedure mnuTabCopyNameClick(Sender: TObject);
  
positive.code:   UpdateMenuEnabled(mnuTabMoveF3, (NCur<>8));
    UpdateMenuEnabled(mnuTabMoveNext, (NVis>=2) and (NCur<6));
    UpdateMenuEnabled(mnuTabMovePrev, (NVis>=2) and (NCur<6));
  end;
  
  procedure TfmMain.PythonEngineAfterInit(Sender: TObject);
  
negative.code:     mnuTabColor.Caption:= 'Set tab color...';
      mnuTabColor.OnClick:= @mnuTabColorClick;
      PopupTab.Items.Add(mnuTabColor);
  
      mnuTabPinned:= TMenuItem.Create(Self);
      mnuTabPinned.Caption:= 'Pinned';
      mnuTabPinned.OnClick:= @mnuTabPinnedClick;
      PopupTab.Items.Add(mnuTabPinned);
    end;
  
    DoLocalizePopupTab;
  