paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-26 20:40:36 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: make sure to always load form resources when resaving forms with i18n, bug #38640

Browse Source 
git-svn-id: trunk@64891 -
This commit is contained in:
maxim 2021-03-29 22:24:02 +00:00
parent ce7e9909e5
commit db10027e7d
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ide/main.pp
View File

@ -4355,7 +4355,7 @@ begin
LFMFileName:=AnUnitInfo.UnitResourceFileformat.GetUnitResourceFilename(AnUnitInfo.Filename,true); LFMFileName:=AnUnitInfo.UnitResourceFileformat.GetUnitResourceFilename(AnUnitInfo.Filename,true);
if FileExistsCached(LFMFileName) and (not AnUnitInfo.DisableI18NForLFM) then if FileExistsCached(LFMFileName) and (not AnUnitInfo.DisableI18NForLFM) then
begin begin
OpenStatus:=LazarusIDE.DoOpenEditorFile(AnUnitInfo.Filename,-1,-1,[ofAddToRecent]); OpenStatus:=LazarusIDE.DoOpenEditorFile(AnUnitInfo.Filename,-1,-1,[ofAddToRecent, ofDoLoadResource]);
if OpenStatus=mrOk then if OpenStatus=mrOk then
begin begin
AnUnitInfo.Modified:=true; AnUnitInfo.Modified:=true;