fix an invalid param was always passed to runnable processes

This commit is contained in:
Basile Burg 2014-11-16 13:25:42 +01:00
parent 80d60dd453
commit 064d32e45a
1 changed files with 2 additions and 1 deletions

View File

@ -1306,7 +1306,8 @@ begin
+ ' successfully compiled', editor, amcEdit, amkInf);
fRunProc.CurrentDirectory := extractFilePath(fRunProc.Executable);
fRunProc.Parameters.DelimitedText := expandSymbolicString(runArgs);
if runArgs <> '' then
fRunProc.Parameters.DelimitedText := expandSymbolicString(runArgs);
fRunProc.Executable := fname + exeExt;
fPrInpWidg.process := fRunProc;
fRunProc.Execute;