fix #76, compile project... (and run with arg) is broken

This commit is contained in:
Basile Burg 2016-06-17 19:54:50 +02:00
parent 3b6c080bf2
commit 1fb1c8db47
1 changed files with 4 additions and 0 deletions

View File

@ -2477,7 +2477,11 @@ end;
procedure TCEMainForm.actProjCompAndRunWithArgsExecute(Sender: TObject);
begin
fRunProjAfterCompile := true;
fRunProjAfterCompArg := true;
if fAppliOpts.autoSaveProjectFiles then
saveModifiedProjectFiles(fProject);
fProject.compile;
end;
procedure TCEMainForm.actProjRunExecute(Sender: TObject);