FIX: Rebuild multiarc.ini (fixes #1568)

This commit is contained in:
Alexander Koblov 2024-04-10 21:21:38 +03:00
commit e751c2ded2
2 changed files with 8 additions and 2 deletions

View file

@ -1570,7 +1570,7 @@ begin
CopyFile(gpExePath + 'default' + PathDelim + 'pixmaps.txt', gpCfgDir + 'pixmaps.txt');
end;
// multiarc configuration file
if not mbFileExists(gpCfgDir + sMULTIARC_FILENAME) then
if (mbFileSize(gpCfgDir + sMULTIARC_FILENAME) = 0) then
begin
CopyFile(gpExePath + 'default' + PathDelim + sMULTIARC_FILENAME, gpCfgDir + sMULTIARC_FILENAME);
end;

View file

@ -325,7 +325,13 @@ begin
end;
FList.AddObject(Section, MultiArcItem);
end;
if FirstTime then AutoConfigure;
if FirstTime then
try
AutoConfigure;
SaveToFile(FileName);
except
// Ignore
end;
finally
FreeAndNil(IniFile);
FreeAndNil(Sections);