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

IDE: comments

Browse Source
This commit is contained in:
mattias 2022-07-26 16:38:09 +02:00
parent 96cf3062ba
commit 2155544f01
1 changed files with 3 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
ide/main.pp
View File

@ -130,7 +130,6 @@ uses
debugger_language_exceptions_options, debugger_signals_options,
codeexplorer_update_options, codeexplorer_categories_options,
codeobserver_options, help_general_options, env_file_filters,
IdeDebugger_FpValConv_Options,
// project option frames
project_application_options, project_forms_options, project_lazdoc_options,
project_save_options, project_versioninfo_options, project_i18n_options,
@ -4510,7 +4509,7 @@ begin
// check .lrj file
LRJFilename:=ChangeFileExt(CurFilename,'.lrj');
if FileExistsCached(LRJFilename) then
Files[LRJFilename]:=nil;
Files[LRJFilename]:=nil; // add
// check .rst/.rsj file
RSTFilename:=ChangeFileExt(CurFilename,'.rst');
RSJFilename:=ChangeFileExt(CurFilename,'.rsj');
@ -4526,9 +4525,9 @@ begin
end;
//DebugLn(['TMainIDE.UpdateProjectPOFile Looking for .rst file ="',RSTFilename,'"']);
if FileExistsCached(RSTFilename) then
Files[RSTFilename]:=nil;
Files[RSTFilename]:=nil; // add
if FileExistsCached(RSJFilename) then
Files[RSJFilename]:=nil;
Files[RSJFilename]:=nil; // add
end;
// update po files