anchor.diff:    FreeAndNil(FListTimers);
   
     FreeAndNil(FListRecents);
  -  FreeAndNil(FListLangs);
     FreeAndNil(FConsoleQueue);
     FreeAndNil(FKeymapUndoList);
   end;
  
positive.code: 
      DoPyEvent(CurrentEditor, cEventOnState, [IntToStr(APPSTATE_LANG)]);
    finally
     FreeAndNil(Items);
    end;
  end;
  
  
negative.code: const
    cEnLang = 'en (built-in)';
  var
    ListFiles, ListNames: TStringList;
    NResult, NItemIndex, i: integer;
    S: string;
  begin
    ListFiles:= TStringList.Create;
    ListNames:= TStringList.Create;
    try
      FindAllFiles(ListFiles, GetAppPath(cDirDataLangs), '*.ini', false);
      if ListFiles.Count=0 then exit;
      ListFiles.Sort;
  
      ListNames.Add(cEnLang);
      for i:= 0 to ListFiles.Count-1 do
      begin
        S:= ExtractFileNameOnly(ListFiles[i]);
        if S='translation template' then Continue;
        ListNames.Add(S);
      end;
  
      NItemIndex:= ListNames.IndexOf(AppLangName);
      if NItemIndex<0 then
        NItemIndex:= 0;
  
      NResult:= DoDialogMenuList(msgMenuTranslations, ListNames, NItemIndex);
      if NResult<0 then exit;
  
      if ListNames[NResult]=cEnLang then
      begin
        AppLangName:= '';
        MsgBox(msgStatusI18nEnglishAfterRestart, MB_OK or MB_ICONINFORMATION);
      end
      else
      begin
        AppLangName:= ListNames[NResult];
        DoLocalize;
  
        if DirectoryExists(GetAppPath(cDirData)+DirectorySeparator+'langmenu') then
  