瀏覽代碼

Fix interactive information log error

Pierre Muller 2 年之前
父節點
當前提交
246326999b
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      packages/fpmkunit/src/fpmkunit.pp

+ 1 - 1
packages/fpmkunit/src/fpmkunit.pp

@@ -6557,7 +6557,7 @@ begin
       ConsoleOutput := TMemoryStream.Create;
       try
         if Interactive then
-          Log(vlInfo,'Starting "%s" "%s" interactively',[Cmd,Args]);
+          Log(vlInfo,'Starting "%s" "%s" interactively',[Cmd,CmdLine]);
         {$ifdef HAS_UNIT_PROCESS}
         E:=ExecuteFPC(Verbose, Interactive, cmd, args, env, ConsoleOutput);
         {$else}