Browse Source

* fix for popen brokenness

git-svn-id: trunk@4894 -
marco 19 years ago
parent
commit
94e0b66d0a
1 changed files with 2 additions and 2 deletions
  1. 2 2
      rtl/unix/unix.pp

+ 2 - 2
rtl/unix/unix.pp

@@ -828,7 +828,7 @@ begin
             close(pipo);
 {$endif USE_VFORK}
           end;
-        if ret=1 then
+        if ret=-1 then
          fpexit(127);
       end;
      {$if defined(FPC_USE_FPEXEC) and not defined(USE_VFORK)}
@@ -943,7 +943,7 @@ begin
             close(pipo);
 {$endif USE_VFORK}
           end;
-        if ret=1 then
+        if ret=-1 then
          fpexit(127);
       end;
      {$if defined(FPC_USE_FPEXEC) and not defined(USE_VFORK)}