Procházet zdrojové kódy

Fix interactive information log error

Pierre Muller před 2 roky
rodič
revize
246326999b
1 změnil soubory, kde provedl 1 přidání a 1 odebrání
  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}