Răsfoiți Sursa

* removed single remaining use of a 1.0.x deprecated function.

git-svn-id: trunk@21322 -
marco 13 ani în urmă
părinte
comite
8082982d46
1 a modificat fișierele cu 1 adăugiri și 1 ștergeri
  1. 1 1
      ide/fpcompil.pas

+ 1 - 1
ide/fpcompil.pas

@@ -1008,7 +1008,7 @@ begin
 {$endif}
 {$ifdef Unix}
        error:=0;
-       If Shell(GetExePath+PpasFile)=-1 Then
+       If fpsystem(GetExePath+PpasFile)=-1 Then
         Error:=fpgeterrno;
 {$else}
        DosExecute(GetEnv('COMSPEC'),'/C '+GetExePath+PpasFile);