Browse Source

* properly initialize FPipeBuffersize. Follow up to Mantis #22327

git-svn-id: trunk@21749 -
marco 13 years ago
parent
commit
2c3787d415
1 changed files with 1 additions and 0 deletions
  1. 1 0
      packages/fcl-process/src/process.pp

+ 1 - 0
packages/fcl-process/src/process.pp

@@ -249,6 +249,7 @@ begin
   {$ifdef UNIX}
   FForkEvent:=nil;
   {$endif UNIX}
+  FPipeBufferSize := 1024;
   FEnvironment:=TStringList.Create;
   FParameters:=TStringList.Create;
 end;