Add code to removed redundant Prefs:Updating section from config file in first run code

Author: delphidabbler

Src/FirstRun.UConfigFile.pas

@@ -96,6 +96,8 @@   TUserConfigFileUpdater = class(TConfigFileUpdater)
     procedure DeleteProxyServerSection;
     ///  <summary>Deletes unused Prefs:News section.</summary>
     procedure DeleteNewsPrefs;
+    ///  <summary>Deletes unused Prefs:Updating section.</summary>
+    procedure DeleteUpdatingPrefs;
     ///  <summary>Effectively renames MainWindow section used prior to version
     ///  11 as WindowState:MainForm.</summary>
     procedure RenameMainWindowSection;
@@ -312,6 +314,13 @@ procedure TUserConfigFileUpdater.DeleteProxyServerSection;
   DeleteIniSection('ProxyServer', CfgFileName);
 end;
 
+procedure TUserConfigFileUpdater.DeleteUpdatingPrefs;
+begin
+  if not TFile.Exists(CfgFileName, False) then
+    CreateNewFile;
+  DeleteIniSection('Prefs:Updating', CfgFileName);
+end;
+
 class function TUserConfigFileUpdater.GetFileVersion: Integer;
 begin
   Result := FileVersion;

Src/FirstRun.UMain.pas

@@ -242,6 +242,7 @@ procedure TFirstRun.UpdateUserCfgFile(out Changes: TFirstRunCfgChangeSet);
   begin
     fUserConfigFile.DeleteNewsPrefs;
     fUserConfigFile.DeleteProxyServerSection;
+    fUserConfigFile.DeleteUpdatingPrefs;
   end;
 
   {$IFNDEF PORTABLE}