瀏覽代碼

* Flush text output before calling external programs

git-svn-id: trunk@15917 -
joost 15 年之前
父節點
當前提交
1a7cbeeb88
共有 1 個文件被更改,包括 1 次插入0 次删除
  1. 1 0
      utils/fppkg/pkghandler.pp

+ 1 - 0
utils/fppkg/pkghandler.pp

@@ -156,6 +156,7 @@ end;
 Function TPackageHandler.ExecuteProcess(Const Prog,Args:String):Integer;
 Function TPackageHandler.ExecuteProcess(Const Prog,Args:String):Integer;
 begin
 begin
   Log(vlCommands,SLogExecute,[Prog,Args]);
   Log(vlCommands,SLogExecute,[Prog,Args]);
+  Flush(StdOut);
   Result:=SysUtils.ExecuteProcess(Prog,Args);
   Result:=SysUtils.ExecuteProcess(Prog,Args);
 end;
 end;