paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-21 01:29:29 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Fixed RunCommandIndir with poStderrToOutput

Browse Source 
git-svn-id: trunk@39620 -
This commit is contained in:
joost 2018-08-15 21:31:56 +00:00
parent cfab40fd74
commit 098464d260
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
packages/fcl-process/src/process.pp
View File

@ -573,7 +573,8 @@ begin
// Get left output after end of execution
ReadInputStream(output,BytesRead,OutputLength,OutputString,250);
setlength(outputstring,BytesRead);
ReadInputStream(StdErr,StdErrBytesRead,StdErrLength,StdErrString,250);
if assigned(stderr) then
ReadInputStream(StdErr,StdErrBytesRead,StdErrLength,StdErrString,250);
setlength(stderrstring,StderrBytesRead);
anexitstatus:=exitstatus;
result:=0; // we came to here, document that.