瀏覽代碼

* fix for popen brokenness

git-svn-id: trunk@4894 -
marco 19 年之前
父節點
當前提交
94e0b66d0a
共有 1 個文件被更改,包括 2 次插入2 次删除
  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)}